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Preface 



This publication is a reference manual 
for the programmer using the assembler 
language (including macro definitions and 
conditional assembly facilities). This 
publication also contains information 
peculiar to DOS and TOS for the D and F 
assembler. 

Part 1 of this publication presents 
information common to all parts of the 
language. Part 2 contains specific 
information concerning the symbolic machine 
instruction codes and the assembler program 
functions provided for the programmers 
use. Part 3 of this publication describes 
the conditional assembler and macro 
facilities in the assembler language. 

Appendixes A through P follow Part 3. 
Appendixes A through F are associated with 
Parts 1 and 2 and present such items as a 
summary chart for constants, instruction 
listings, character set representations, 
and other aids to programming. Appendix G 
contains macro facility summary charts, and 
Appendix H discusses table capacities for 
various elements of the language. Appendix 
I is a sample program and assembler listing 
description. Appendix J is a features 
comparison chart of the OS assemblers. 
Appendix K gives examples of the cards 
needed for assembler runs. Appendix L 
contains a description of how another 
version of the assembler can be included in 
the core image library. Appendix M 
describes the output produced by the 
assembler. Appendix N explains the 
diagnostic error messages that can be 
issued by the assembler. Appendix 0 
contains self-relocating program 
techniques. Appendix P contains sample 
macro definitions. 


Prerequisite for a thorough 
understanding of this publication is a 
I basic knowledge of IBM System/360 machine 
instructions. The publications most 
closely related to this are: 


1. IBM System/360 Principles of 

Operation , Order No. GA22-6821. 


2. DOS Data Management Concepts , Order 
No. GC24-3427, or 

IBM System/360 Tape Operating System : 
Data Management Concepts , Order No. 
GC24-3430. 

3. DOS Supervisor and I/O Macros , Order 
No. GC24-5037, or 

IBM System/360 Tape Operating System : 
Supervisor and Input/Output Macros , 
Order No. GC24-5035. 

4. DOS System Control and Service , Order 
No. GC24-5036, or 

IBM System/360 Tape Operating System : 
System Control and System Service 
Programs , Order No. GC24-5034. 

5. DOS System Generation , Order No. 
GC24-5033, or 

IBM System/360 Tape Operating System : 
System Generation and Maintenance , 
Order No. GC24-5015. 

6. DOS and TOS Utility Macros , Order No. 
GC24-5042. 

Titles and abstracts of other related 
publications are listed in the IBM 
System/360 Bibliography , Order 
No. GA22-6822. 
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Section 1. Introduction 


Computer programs may be expressed in 
machine language, i.e., language directly 
interpreted by the computer, or in a 
symbolic language, which is much more 
meaningful to the programmer. The symbolic 
language, however, must be translated into 
machine language before the computer can 
execute the program. This function is 
accomplished by an associated processing 
program called an assembler or a compiler. 


Of the various symbolic programming 
languages, assembler languages are closest 
to machine language in form and content. 


The assembler language discussed in this 
manual is a symbolic programming language 
for the IBM System/360. It enables the 
programmer to use all IBM Systen/360 
machine functions, as if he were coding in 
IBM System/360 machine language. 

A program written in the assembler 
language will normally consist of three 
types of instructions: machine 
instructions, assembler instructions, and 
macro instructions. They are all coded in 
a language that can be interpreted by the 
assembler processor program. Machine 
instructions are transformed into machine 
language instruction by instruction. This 
language can be directly interpreted by the 
machine. Their functions are not described 
in this manual. Refer to IBM System/360 
Principles of Operation . 

Assembler instructions are used by the 
assembler during processing to manipulate 
the source program written in the assembler 
language. They are described in this 
manual. 

IBM-supported macro instructions provide 
easy access to the control programs 
supplied by the system under which the 
installation is running. They are 
described in IBM System/360 Tape Operating 
System Supervisor and Input/Output Macros , 
and in DOS Supervisor and I/O Macros . The 
user can also write his own macro 
definitions to obtain easy access to 
precoded sections of code. Writing macro 
definitions is covered in this manual. 

Under the Disk and Tape Operating 
Systems a few different assembler variants 
are available. They are: 

TOS: Assembler D, 10K variant 
Assembler D, 14 k variant 


DOS: Assembler D, 10K variant 
Assembler D, 14K variant 
Assembler F 

The requirements and features of the 
variants are described below. Two of the 
assemblers, the DOS Assembler D, 14K 
variant, and the Assembler F contain 
features not supported by the other DOS/TOS 
assemblers. 


Machine Features Required 


A minimum of 16,384, 24,576, or 65,536 
bytes of main storage as detailed below: 

® 16,384 (16K) bytes of main storage, of 

which at least 10,240 contiguous bytes 
must be available to the assembler. 
This is the core requirement for the 
10K variant DOS and TOS D assemblers. 

• 24,576 (24K) bytes of main storage, of 
which at least 14,336 contiguous bytes 
must be available to the assembler. 
This is the core requirement for the 
14K variant DOS and TOS D assemblers. 

• 65,536 (64K) bytes of main storage, of 
which at least 45,056 contiguous bytes 
must be available to the assembler. 
This is the core requirement for the 
44K DOS F assembler. 

Note : The minimum partition required when 

the assembler is executed in the foreground 
partitions is 2K larger than the minimum 
main storage requirements stated above- 
Additional storage, available to any of the 
assemblers, is used to expand assembler 
tables. For details on how to call a 
specific assembler see Appendix K and the 
DOS and TOS System Generation publications 
(listed in "Preface") . 

• Standard instruction set. 

• One I/O Channel (either multiplexor or 
selector) . 

• One Card Reader (1442N1, 2501, 2520B1, 
or 2540) 

• One Card Punch (1442N1, 1442N2,2520, 
or 2540) ■*, if punched, output is 
desired 

• One Printer (1403, 1404—continuous 
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forms only, or 1443) 1 , if a printed 
listing is desired. 

• One 1052 Printer-Keyboard. 

• One 2311, 2314, or 2319 Disk Storage 
Drive. This has the DOS resident 
system pack. 

or 

• One 2400-series Magnetic Tape Unit 
(either 7-track or 9-track). This has 
the TOS resident system. 

• Three work files. Under the DOS D 
Assembler, 10K Variant: either three 
disk storage extents or three magnetic 
tape units. The devices used must be 
all of the same type; i.e., three 
magnetic tape units, three 2311 disk 
storage extents, or three 2314 or 2319 
disk storage extents. Under the DOS D 
Assembler, 14K Variant, and the DOS F 
Assembler: any combination of disk 
storage extents and/or magnetic tape 
units. The disk storage devices used 
need not be of the same type as that 
of SYSRES. Under the TOS D Assembler, 
10K and 14K Variants: three magnetic 
tape units. The devices used must be 
of the same type as that of SYSRES. 

The allowable disk storage devices are 
the 2311, 2314, and the 2319 Disk Storage 
Drives. The allowable magnetic tape units 
are 2400-series Magnetic Tape Units (either 
7-track or 9-track: if 7-track, the data 
conversion feature is required and the tape 
must be set converter on, translator off, 
odd parity). 

Under the DOS D Assembler, 10K Variant, 
only the system source statement library is 
supported. Under the DOS D Assembler, 14K 
Variant, and the DOS F Assembler, a private 
source statement library is supported. 

Under the TOS D Assembler, 10K and 14K 
Variants, the standard private library is 
supported. The device used for the private 
library must be of the same type as that of 
SYSRES. 

For the 10K DOS and the 14K TOS D 
assemblers, the assemble-and-execute option 
is an alternative to the DECK option; both 
are not supported for the same assembly. 

For the 14K DOS D assembler and for the F 


A 2400-series Magnetic Tape Unit may be 
substituted for this device. (It may be 
7-track or 9-track. If 7-track is used 
the data conversion feature is required 
and the tape must be set converter on, 
translator off, odd parity.) The 1052 
Printer-Keyboard must be operable if 
device assignment is tape. 


assembler, both options are supported in 
the same assembly. If the 
assemble-and-execute option is chosen, 
SYSLNK is a 2400-series Magnetic Tape Unit 
(9-track or 7-track with the data 
conversion feature) for the tape resident 
system, or a 2311, 2314, or 2319 Disk 
Storage extent (which may be on the system 
resident device) for the disk resident 
system. 

If, for assembly, LINK or CATAL options 
are chosen, the I/O requirements for 
SYSLNK must be met. 

Compatibility between System/360 
Assemblers 

The assemblers described in this manual can 
be used under the Disk or Tape Operating 
System running on an IBM System/360 Model 
30 or larger or on an IBM System/370 
machine, provided that main storage and 
input/output requirements are satisfied. 

The following describes the 
compatibility between: 

• the different DOS/TOS assemblers 

• the DOS/TOS assemblers and the OS 
assemblers 

• the BPS/BOS assemblers and the DOS/TOS 
assemblers. 

Incompatibilities caused by some other part 
of a system than the assembler are not 
described. For example, if a program 
segmented into an overlay structure under 
OS is run under DOS in the same overlay 
structure, V-type address constants that 
reference external data can be invalid. 

The programmer must also realize that 
IBM-supplied macros differ from system to 
system. A DTFCD macro coded for DOS will 
be treated as an undefined operation code, 
if assembled under OS. 

Treatment of erroneous input, as well as 
the assignment, size, and ordering of 
literal pools can also differ among the 
assemblers. 


DOS/TOS Assembler Variants 


The TOS variants and the 10K variant of the 
DOS Assembler D accept the same input and 
produce identical output. A program 
accepted by these variants will also be 
accepted by the 14K variant of the DOS 
Assembler D and Assembler F. Those two 
variants have a few extended features. 



r\ 



12 Part 1: Introduction to the Assembler Language 



The L-type constant 


The DOS Assembler D, 14K variant, 
contains the following features not 
supported by any of the other DOS/TOS 
assemblers: 


• The WXTRN instruction 

• All System/370 instructions. The 
additional instructions are: AXR, 
CLCTL, CLM, HDV, ICM, LCTL, LRDR, 

LRER, MC, MVCL, MXD, MXDR, MXR, SCK, 
SIOF, SRP, STCK, STCM, STCTL, STIDC, 
STIDP, and SXR. 

• The L-type constant 

• SSYSPARM 

The DOS Assembler F contains the 
following features not supported by the 
other DOS/TOS assemblers: 

• Two continuation lines allowed for 
source statements other than macro 
instructions and prototype statements. 
Assembler D only allows one per 
statement. 

• Multiple operands in a DC statement. 

• Bit length specification in DC 
statements. 

• The maximum number of operands in a 
macro instruction or prototype 
statement is 200 as opposed to 100 for 
Assembler D. 

• The maximum size of a character 
expression is 255 characters as 
opposed to 127 for Assembler D. 

• The maximum value of a subscript of 
6SYSLIST is 200 as opposed to 100 for 
Assembler D. 


The DOS/TOS Assemblers and the OS 
Assemblers 


The DOS Assembler F implements the full 
System/360 Operating System assembler 
language at the F level with the following 
exceptions: 

• CXD and DXD statements 

• Q~type address constants 

• The special instructions for 
System/370 and System/360 Models 85 
and 195. 

• The WXTRN instruction 


• 

Source code written for any DOS/TOS 
assembler except the DOS Assembler D, 14K 
variant, will be accepted by the OS 
Assembler F. The 14K variant supports 
SSYSPARM, which is not supported by OS. 


The BOS/BPS Assemblers and the DOS/TOS 
Assemblers 


The DOS/TOS assemblers accept source 
programs written in the IBM System/360 
Basic Programming Support Assembler (8K 
Tape) Language, the IBM 7090/7094 Support 
Package for IBM System/360 Assembler 
Language, and the IBM System/360 Basic 
Operating System (8K Disk) Assembler 
Language with the following restrictions: 

• The XFR instruction is not allowed in 
DOS/TOS. 

• If SET symbols are used in macros 
generated in the source code, LCLx and 
GBLx instructions must be added in 
those macro definitions to declare the 
SET symbols. 

• An MNOTE assembler instruction whose 
operand entry consists solely of a 
message enclosed in apostrophes, is 
given a severity code of one. 

• The logical expression in an AIF 
statement must not be explicit zeros 
or ones. 

Note 1 : The DOS/TOS assemblers accept A1FE 
and AGOB statements. They are treated as 
AIF and AGO statements. 

Note 2 : Assembler control statements 
(AWORK, AOPTN, etc.) should be excluded 
from the input to the DOS/TOS assembler. 
They are treated as undefined operation 
codes. 


The Assembler Language 

The basis of the assembler language is a 
collection of mnemonic symbols which 
represent: 

1. IBM System/360 Operating System 
machine language operation codes. 

2. Operations (auxiliary functions) to be 
performed by the assembler program. 

The language is augmented by other 
symbols, supplied by the programmer, and 
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these symbols are used to represent storage 
addresses or data. Symbols are easier to 
remember and code than their machine 
language equivalents. Use of symbols 
greatly reduces programming effort and 
error. 


MACHINE OPERATION CODES 


The assembler language provides mnemonic 
machine instruction operation codes for all 
machine instructions in the IBM System/360 
Universal Instruction Set, and extended 
mnemonic operation codes for the 
conditional branch instruction. 


ASSEMBLER OPERATION CODES 


The assembler language also contains 
mnemonic assembler instruction operation 
codes, used to specify auxiliary functions 
to be performed by the assembler program. 
These are instructions to the assembler 
program itself and, with a few exceptions, 
do not result in the generation of any 
machine language code by the assembler 
program. Certain assembler instructions, 
i.e. , conditional assembly instructions, 
affect the order of source statement 
assembly and macro generation or the 
content of generated instructions. 


MACRO INSTRUCTIONS 


The assembler language enables the 
programmer to define and use macro 
instructions. Macro instructions are 
represented by an operation code which, in 
turn, actually stands for a sequence of 
machine and/or assembler instructions that 
accomplish the desired function. 

Macro instructions used in preparing an 
assembler language source program fall into 
two categories: system macro instructions, 
provided by IBM, which relate the object 
program to components of the Basic 
Operating System, and macro instructions 
created by the programmer specifically for 
use in the program at hand, or for 
incorporation in a library, available for 
future use. 

Programmer-created macro instructions 
are used to simplify the writing of a 
program and/or to ensure that a standard 
sequence of instructions is used to 
accomplish a desired function. 


For instance, the logic of a program may 
require the same instruction sequence to be 
executed again and again. Rather than code 
this entire sequence each time it is 
needed, the programmer creates a macro 
instruction to represent the sequence, and 
then each time the sequence is needed, the 
programmer simply codes the macro 
instruction statement. During assembly, 
the sequence of instructions represented by 
the macro instruction is inserted in the 
object program. Part 3 of this publication 
discusses the conditional assembly and 
macro facilities. 


The Assembler Program 


The assembler program, also referred to as 
the "assembler", processes source 
statements written in the assembler 
language. The assembler is separated into 
an assembly section and a conditional 
assembly and macro generation section. 


THE MACRO GENERATION AND CONDITIONAL 
ASSEMBLY SECTION 


Before source statements can be translated 
into actual machine language, macro 
instructions and conditional assembly 
statements within the source program must 
be processed. The source program is read. 
Any programmer macro definitions which 
appear before the main portion of the 
program are stored for use when the macro 
is referenced. (System macro definitions 
are retrieved from the source statement 
library and handled in the same way.) 

The main portion of the program is then 
processed. Whenever macro generation or 
conditional assembly is required, the 
generated or conditionally assembled text 
is inserted in the original source program. 
The resultant augmented source program is 
ready for input to the assembly section. 


THE ASSEMBLY SECTION 


Processing a source program involves the 
translation of source statements into 
machine language, the assignment of storage 
locations to instructions and other 
elements of the program, and the 
performance of the auxiliary assembler 
program functions designated by the 
programmer. The output of the assembler 
program is the object program , a machine 
language equivalent of the source program. 
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The assembler program furnishes a printed 
listing of the source statements and object 
program statements and additional 
information useful to the programmer in 
analyzing his program, such as error 
indications. The object program is in the 
format required by the linkage editor 
component of DOS/TOS. 

The amount of main and secondary storage 
allocated to the assembler program for use 
during processing determines the maximum 
number of certain language elements that 
may be present in the source program. For 
a discussion of these dependencies, see 
Appendix H. 

Programmer Aids 

The assembler program provides auxiliary 
functions that assist the programmer in 
checking and documenting programs, in 
controlling address assignment, in 
segmenting a program, in data and symbol 
definition, in generating macro 
instructions, and in controlling the 
assembly program itself. Mnemonic codes, 
specifying these functions, are provided in 
the language. 

Variety in Data Representation . Decimal, 
binary, hexadecimal, or character 
representation of machine language binary 
values may be employed by the programmer in 
writing source statements. The programmer 
selects the representation best suited to 
his purpose. 

Base Register Address Calculation . As 
discussed in the IBM System/360 Principles 
of Operation manual, the operating system 
addressing scheme requires the designation 
of a base register (containing a base 
address value) and a displacement value in 
specifying a storage location. The 
assembler assumes the clerical burden of 
calculating storage addresses in these 
terms for the symbolic addresses used by 
the programmer. The programmer retains 
control of base register usage and the 
values entered therein. 

Relocatability . The object programs 
produced by the assembler are in a format 
enabling relocation from the originally 
assigned storage area to any other suitable 
area. 


Sectioning and Linking . The assembler 
language and program provide facilities for 
partitioning an assembly into one or more 
parts called control sections . Control 
sections may be added or deleted when 
linkage editing the object program. 

Because control sections do not have to be 
loaded contiguously in storage, a sectioned 
program may be loaded and executed even 
though a continuous block of storage large 
enough to accommodate the entire program 
may not be available. 

The linking facilities of the assembler 
language and program allow symbols to be 
defined in one assembly and referred to in 
another, thus effecting a link between 
separately assembled programs. This 
permits reference to data and/or transfer 
of control between programs. A discussion 
of sectioning and linking is in Section 3 
under "Program Sectioning and Linking." 


Program Listings . A listing of the source 
program statements and the resulting object 
program statements may be produced by the 
assembler for each source program it 
assembles. The programmer can partly 
control the form and content of the 
listing. 

Error Indications . As a source program is 
assembled, it is analyzed for actual or 
potential errors in the use of the 
assembler language. Detected errors are 
indicated in the program listing. 


Assembler - DOS/TOS Relationships 


The assembler program is a component of IBM 
disk and tape operating systems and 
functions under their control. DOS/TOS 
provides the assembler with input/output 
library, and other services needed in 
assembling a source program. In a like 
manner, the object program produced by the 
assembler will normally operate under 
control of DOS/TOS and depend on it for 
input/output and other services. In 
writing the source program, the programmer 
must include statements requesting the 
desired functions from DOS/TOS. (See the 
Supervisor and Input/Output Macros 
publications listed in the "Preface".) 
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Section 2. General Information 


This section presents information about 
assembler language coding conventions, 
assembler source statement structure, 
addressing, and the sectioning and linking 
of programs. 


Assembler Language Coding Conventions 

This subsection discusses the general 
coding conventions associated with use of 
the assembler language. 


CODING FORM 


A source program is a sequence of source 
statements that are punched into cards. A 
standard assembler card is shown in Figure 
2. These statements may be written on the 
standard coding form, GX28-6509 (Figure 1) , 
provided by IBM. One line of coding on the 
form is punched into one card. The 
vertical columns on the form correspond to 
card columns. 

Space is provided on the form for 
program identification and instructions to 
keypunch operators. None of this 
information is punched into a card. 

The body of the form (Figure 1) is 
composed of two fields: the statement 
field, columns 1-71, and the 
identification-sequence field, columns 
73-80. The identification-sequence field 
is not part of a statement and is discussed 
following the subsection "Statement 
Format." 

The entries (i.e., coding) composing a 
statement occupy columns 1-71 of a 


statement line and, if needed, columns 
16-71 of successive continuation lines. 


CONTINUATION LINES 


When it is necessary to continue a 
statement on another line the following 
rules apply. 

1. Enter any nonblank character in the 
continuation column (end column plus 
one) of the statement line. 

2. Continue the statement on the next 
line, starting in the continue column. 
Columns to the left of the continue 
column must be blank. 

One continuation line is allowed for the 
D assembler and two continuation lines are 
allowed for the F assembler, except for 
source macro instructions and macro 
prototype statements, which may have more 
than one continuation line (see Part 3) . 


STATEMENT BOUNDARIES 


Source statements are normally contained in 
columns 1-71 of statement lines and columns 
16-71 of any continuation lines. 

Therefore, columns 1, 71, and 16 are 
referred to as the "begin", "end", and 
"continue" columns, respectively. This 
convention may be altered by use of the 
Input Format Control (ICTL) assembler 
instruction discussed later in this 
publication. 
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3 2 3 3 3 3)3 

4 4 4 4 4 4 

5 5 5 5 5 5 

6 6 6 6 6 6 

7 7 7 7 7 7 

8 8 8 8 8 8 


9 9 9 9 9 9 

166 67 68 68 70 71 


WOnFKlTM KMKE 


73 74 75 7 # 77 78 78 80 | 
11111111 

22222222 

33333333 

44444444 

55555555 

66666666 

77777777 

88888888 

99999999 

[n 74 75 78 77 78 78 84 


Figure 2. Punched Card Form 


STATEMENT FORMAT 


There are two types of 

statements—instructions and comments. 

Instructions may consist of one to four 
entries in the statement field. They are. 


from left to right: a name entry, an 
operation entry, an operand entry, and a 
comments entry. These entries must be 
separated by one or more blanks, and must 
be written in the order stated- Total 
statement size is limited to 187 
characters. If this limit is exceeded, the 
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assembly listing may be incorrect for that 
statement. 

The coding form (Figure 1) is ruled to 
provide an eight^character name field, a 
five-character operation field, and a 
56-character operand and/or comments field. 

If desired, the programmer may disregard 
these boundaries and write the name, 
operation, operand, and comment entries in 
other positions, subject to the following 
rules: 

1. The entries must not extend beyond 
statement boundaries (either the 
conventional boundaries, or as 
designated by the programmer via the 
ICTL instruction). 

2. The entries must be in proper 
sequence, as stated above. 


Operand Entries . Operand entries are the 
coding that identifies and describes data 
to be acted upon by the instruction, by 
indicating such things as storage 
locations, masks, storage area lengths, or 
types of data. 

Depending on the need of the 
instruction, one or more operands may be 
written. Operands are required for all 
machine instructions. 

Operands must be separated by commas. 
Blanks must not intervene between operands 
and the commas that separate them. 

The operands may not contain embedded 
blanks except as follows: If character 
representation is used to specify a 
constant, a literal, or immediate data in 
an operand, the character string may 
contain blanks, e.g., C*AB D*. 


3. The entries must be separated by one 
or more blanks. 

4. if used, a name entry must be written 
starting in the begin column. 

5. The name and operation entries must be 
completed in the first line of the 
■statement, including at least one 
blank following the operation entry. 

A description of the name, operation, 
operand, and comments entries follows: 

Name Entries : The name entry is a symbol 
created by the programmer to identify a 
statement. It consists of one to eight 
alphanumeric characters, the first of which 
must be alphabetic. A name entry is 
usually optional, but, if present, must be 
entered with the first (or only) character 
appearing in the begin column. If the 
begin column is blank, the assembler 
program assumes no name has been entered. 
Blanks must not appear within a name entry, 
whether the symbol was introduced directly 
by the programmer or indirectly by 
conditional assembly or macro generation. 

Operation Entries . The operation entry is 
the mnemonic operation code specifying the 
desired machine operation, macro, or 
assembler function. An operation entry is 
mandatory and must appear in the first 
statement line, starting at least one 
position to the right of the begin column. 
Valid mnemonic operation codes for machine 
and assembler operations are contained in 
Appendixes D and E of this publication. 
Valid operation codes consist of five 
characters or fewer for machine or 
assembler operation codes, and eight 
characters or fewer for macro instruction 
operation codes. No blanks may appear 
within the operation entry. 


Comments Entries . Comments are descriptive 
items of information about the program that 
are to be inserted in the program listing. 
All 256 valid characters, including blanks, 
may be used in writing a comment. The 
entry cannot extend beyond the end column 
(normally column 71) , and a blank must 
separate it from the operand. 

In instructions where an operand entry 
is optional but not present and a comments 
entry is desired, the absence of the 
operand entry must be indicated by a comma 
preceded and followed by one or more 
blanks, as follows: 


r- t-t- 

(Name (OperationjOperand 

j,-+-+- 


START 


COMMENT 


END 


COMMENT 


L-X- X -J 


Instruction Example . The following 
illustrates the use of name, operation, 
operand, and comments entries. A compare 
instruction has been named by the symbol 
COMP; the operation entry (CR) is the 
mnemonic operation code for a 
register-to-register compare operation, and 
the two operands (5, 6) designate the two 
general registers whose contents are to be 
compared. The comments entry reminds the 
programmer that he is comparing "new sum" 
to "old" with this instruction. 


r- t-t-1 

| Name |Operation|Operand | 

I-- + -4-^ 

(COMP JCR )5,6 NEW SUM TO OLD | 

i_ x -j- J 
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SUMMARY OF INSTRUCTION FORMAT 


Page of GC24-3414-9 
Revised Nov. 31, 1972 
By TNL: GN33-8157 


The entries in an instruction must always 
be separated by at least one blank and must 
be in the following order: name, 
operation, operand (s) , comment. 

Every statement requires an operation 
entry. Name and comment entries are 
optional. Operand entries are required for 
all machine instructions and most assembler 
instructions. 

The name and operation entries must be 
completed in the first statement line, 
including at least one blank following the 
operation entry. 

The name and operation entries must not 
contain blanks. Operand entries must not 
have blanks preceding or following the 
commas that separate them. 

A name entry must always start in the 
"begin" column. 

If the column after the end column is 
blank, the next line must start a new 
statement. If the column after the end 
column is not blank, the following line 
will be treated as a continuation line. 

All entries must be contained within the 
designated begin, end, and continue column 
boundaries. 


COMMENTS STATEMENTS 


Comments statements are used to include a 
programmer's notes on an assembly listing. 

(These notes can be helpful during 
debugging and maintenance of a program.) 
Comments statements are only printed in the 
assembly listing. Other than between a 
macro definition header and a macro 
prototype statement, comments statements 
may appear anywhere in the program. 
Extensive notes, or comments, may be 
written by using a series of comments 
statements. 

There are two types of comments 
statements. One type, written with an 
asterisk (*) in the begin column, is used 
for comments on the source program. The 
other type, written with a period in the 
begin column and followed by an asterisk, 
is used for comments on a macro definition. 
This type is further described in Section 
7. 

An example of the comments statement is: 


r -x-T-T- ^ 

(Name |Operation|Operand | | 

1-x-x-+-^ 

J *THIS COMMENT IS CONTINUED ON | X j 

j ANOTHER LINE. j j 

L-X-J 


IDENTIFICATION-SEQUENCE FIELD 


The identification-sequence field of the 
coding form (columns 73-80) is used to 
enter program identification and/or 
statement sequence characters. The entry 
is optional. If the field, or a portion of 
it, is used for program identification, the 
identification is punched in the statement 
cards, and reproduced in the printed 
listing of the source program. 

To aid in keeping source statements in 
order, the programmer may code an ascending 
sequence of characters in this field or a 
portion of it. These characters are 
punched into their respective cards, and, 
during assembly, the programmer may request 
the assembler to verify this sequence by 
use of the Input Sequence Checking (ISEQ) 
assembler instruction. This instruction is 
discussed in Section 5 under "Program 
Control Instructions." 


CHARACTER SET 


Source statements are written using the 
following characters: 

Letters A through Z, and $, #, a 

Digits 0 through 9 

Special 

Characters +-,==.* () ' / £ blank 

These characters are represented by the 
card punch combinations and internal bit 
configurations listed in Appendix A. In 
addition, any of the 256 punch combinations 
may be designated anywhere that characters 
may appear between paired apostrophes, in 
comments, and in macro instruction 
operands. 


Assembler Language Structure 


The basic structure of the language can be 
stated as follows. 

A source statement is composed of: 
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• A name entry (usually optional) . 

• An operation entry (mandatory) . 

• An operand entry (usually 
required) . 

• A comments entry (optional) . 

A name entry is: 

• A symbol. 

An operation entry is: 

• A mnemonic operation code representing 
a machine, assembler, or macro 
instruction. 

An operand entry is: 

• One or more operands composed of one 
or more expressions. An expression is 
composed of a term or an arithmetic 
combination of terms. In general, an 
operand entry should contain 50 or 
fewer terms (see Appendix H). 

Operands of machine instructions 
generally represent such things as storage 
locations, general registers, immediate 
data, or constant values. Operands of 
assembler instructions provide the 
information needed by the assembler program 
to perform the designated operation. 

Figure 3 depicts this structure. Terms 
shown in Figure 3 are classed as absolute 
or relocatable. Terms are absolute or 


relocatable due to the effect of program 
relocation upon them. (Program relocation 
is the loading of the object program into 
storage locations other than those 
originally assigned by the assembler 
program.) A term is absolute if its value 
does not change upon relocation. A term is 
relocatable if its value changes upon 
relocation. 

The following subsection, "Terms and 
Expressions", discusses these items as 
outlined in Figure 3. 


Terms and Expressions 


TERMS 


Every term represents a value. This value 
may be assigned by the assembler program 
(symbols, symbol length attribute, location 
counter reference) or may be inherent in 
the term itself (self-defining term, 
literal) . 

An arithmetic combination of terms is 
reduced to a single value by the assembler 
program. 

The following material discusses each 
type of term and the rules for its use. 
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May be generated by combination of variable symbols and assembler language characters. 


(Conditional assembly only) 


2 


Conditional assembly only. 


Figure 3. Assembler Language Structure—Machine, Assembler, and Macro Instructions 
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A symbol is a character or combination of 
characters used to represent locations or 
arbitrary values. Symbols, through their 
use in name fields and in operands, provide 
the programmer with an efficient way to 
name and reference a program element. 

There are three types of symbols: 

1. Ordinary symbols. 

2. Variable symbols. 

3. Sequence symbols. 

Ordinary symbols consist of one to eight 
letters and/or numbers, the first of which 
must be a letter. Such symbols are used to 
identify machine locations or arbitrary 
values. In the following sections, the 
occurrence of symbol refers to this type of 
term. Absolute symbols are ordinary 
symbols whose values do not change upon 
program relocation. Relocatable symbols 
are ordinary symbols whose values change 
upon relocation. 

The following are valid ordinary 
symbols: 

READER 

A23456 

X4F2 

L00P2 

N 

S4 

3B4 

$A1 

#56 

It is advisable to avoid using symbols 
beginning with IJ; they may conflict with 
IOCS symbols (which begin with IJ) . 


It is also advisable to avoid using 
symbols which are identical to a file name 
(name field) in a DTF statement with a 
single character suffix. For example, for 
the file name RECIN, IOCS generates the 
symbols: RECIN1, RECIN2, RECIN3, etc. 


The following ordinary symbols are 
invalid, for the reasons noted: 


256B 


First character is not 
alphabetic. 


RECORDAREA2 


More than eight characters. 


BCD*34 


Contains a special 
character--an asterisk. 


IN AREA 


Contains a blank. 


Variable symbols must begin with an 
ampersand (6) followed by one to seven 
letters and/or numbers, the first of which 


must be a letter. Variable symbols are 
used within the source program or macro 
definition to allow different values to be 
assigned to one symbol. A complete 
discussion of variable symbols appears in 
Part 3. 

Sequence symbols consist of a period (.) 
followed by one to seven letters and/or 
numbers, the first of which must be a 
letter. Sequence symbols are used to 
indicate the position of statements within 
the source program or macro definition. 
Through their use the programmer can vary 
the sequence in which statements are 
processed by the assembler program. (See 
the complete discussion in Part 3.) 

Note : Sequence symbols and variable 

symbols are used only for the macro 
language and for conditional assembly. 
Programmers who do not use these features 
need not be concerned with these symbols. 

DEFINING SYMBOLS : The assembler assigns a 
value to each symbol appearing as a name 
entry in a source statement. The values 
assigned to symbols naming storage areas, 
instructions, constants, and control 
sections are the addresses of the leftmost 
bytes of the storage fields containing the 
named items. Since the addresses of these 
items may change upon program relocation, 
the symbols naming them are considered 
relocatable terms. 

A symbol used as a name entry in the 
Equate Symbol (EQU) assembler instruction 
is assigned a value designated in the 
operand entry of the instruction. Since 
the operand entry may represent a 
relocatable value, or an absolute (i.e., 
nonchanging) value, the symbol is 
considered a relocatable term or an 
absolute term, depending on the value to 
which it is equated. 

The value of a symbol may not be 
negative and may not exceed 2 a4f -1. 

A symbol is said to be defined when it 
appears as the name of a source statement. 
(A special case of symbol definition is 
discussed in Section 3, under "Program 
Sectioning and Linking".) 

Symbol definition also involves the 
assignment of a length attribute to the 
symbol. (The assembler maintains an 
internal table—the symbol table—in which 
the values and attributes of symbols are 
kept. When the assembler encounters a 
symbol in an operand, it refers to the 
table for the values associated with the 
symbol.) The length attribute of a symbol 
is the length, in bytes, of the storage 
field whose address is represented by the 
symbol. For example, a symbol naming an 
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instruction that occupies four bytes of 
storage has a length attribute of 4. Note 
that there are exceptions to this rule; for 
example, in the case where symbol has been 
defined by an equate to location counter 
value (EQU *) or to a self-defining term, 
the length attribute of the symbol is 1. 
These and other exceptions are noted under 
the instructions involved. The length 
attribute is never affected by a 
duplication factor. 

PREVIOUSLY DEFINED SYMBOLS : The assembler 
language requires that symbols appearing in 
the operand entry of some instructions be 
previously defined. This simply means that 
the symbols, before their use in an 
operand, must have appeared as the name 
entry of a prior statement. For example: 


SYM1 MVC A, B 

SYM2 EQU SYM1 


would be a valid sequence of coding. The 
same two instructions in reverse order 
would be invalid. 

GENERAL RESTRICTIONS ON SYMBOLS : A Symbol 
may be defined only once in an assembly. 
While the same symbol may appear as the 
name of two or more statements before macro 
generation and conditional assembly, only 
one such statement should be generated. In 
addition, a symbol may be used in the name 
field more than once as a control section 
name (i.e., defined in the START, CSECT, or 
DSECT assembler statements described in 
Section 3) because the coding of a control 
section may be suspended and then resumed 
at any subsequent point. The CSECT or 
DSECT statement that resumes the section 
must be named by the same symbol that 
initially named the section; thus, the 
symbol that names the section must be 
repeated. Such usage is not considered to 
be duplication of a symbol definition. 


Self-Defining Terms 


A self-defining term is one whose value is 
inherent in the term. It is not assigned a 
value by the assembler program. For 
example, the decimal self-defining 
term—15—represents a value of fifteen. 

There are four types of self-defining 
terms: decimal, hexadecimal, binary, and 

character. Use of these terms is spoken of 
as decimal, hexadecimal, binary, or 
character representation of the machine 


language binary value or bit configuration 
they represent. 

Self-defining terms are classed as 
absolute terms because the values they 
represent do not change upon program 
relocation. 


USING SELF-DEFINING TERMS : Self-defining 
terms are the means of specifying machine 
values or bit configurations without 
equating the values to symbols and using 
the symbols. Self-defining terms may be 
used to specify such program elements as 
immediate data, masks, registers, 
addresses, and address increments. 

The use of a self-defining term is quite 
distinct from the use of data constants or 
literals. When a self-defining term is 
used in a machine instruction statement, 
its value is assembled into the 
instruction. When a data constant or 
literal is specified in the operand of an 
instruction, its address is assembled into 
the instruction. 


Decimal Self-Defining Term . A decimal term 
is simply an unsigned decimal number 
written as a sequence of decimal digits. 
High-order zeros may be used (e.g. , 007). 
Limitations on the value of the term depend 
on its use. For example, a decimal term 
that designates a general register must 
have a value between 0 and 15 inclusively; 
one that represents an address must not 
exceed the size of storage. In any case, a 
decimal term may not consist of more than 
eight digits or exceed 16,777,215 (2 3< *-1). 

A decimal term is assembled as its binary 
equivalent. Some examples of decimal 
self-defining terms are: 8, 147, 4092, 
00021 . 


Hexadecimal Self-Defining Term . A 
hexadecimal self-defining term is a 
sequence of one to six hexadecimal digits. 
The digits must be enclosed in single 
apostrophes and preceded by the letter X: 
X*C49 1 . 


Each hexadecimal digit is assembled as 
its four-bit binary equivalent. Thus, a 
hexadecimal term used to represent an 
eight-bit mask would consist of two 
hexadecimal digits. The maximum value of a 
hexadecimal term is X'FFFFFF* . 


The hexadecimal digits and their bit 
patterns are as follows: 


0 - 0000 
1 - 0001 
2 - 0010 
3- 0011 


4- 0100 8- 1000 C- 1100 

5- 0101 9- 1001 D- 1101 

6- 0110 A- 1010 E- 1110 

7- 0111 B- 1011 F- 1111 
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A table for converting from hexadecimal 
representation to decimal representation is 
provided in Appendix B. 

Binary Self-Defining Term . A binary 
self-defining term is written as an 
unsigned sequence of 1*s and 0's enclosed 
in apostrophes and preceded by the letter 
B, as follows: B* 10001101*. This term 
would appear in storage as shown, occupying 
one byte. A binary term may have up to 24 
bits represented. Padding with binary 
zeros is on the left. 

Binary representation is used primarily 
in designating bit patterns of masks or in 
logical operations. 

The following example illustrates a 
binary term used as a mask in a Test Under 
Mask (TM) instruction. The contents of 
GAMMA are to be tested, bit by bit, against 
the pattern of bits represented by the 
binary term. 

r-T"-1-1 

|Name |Operation|Operand j 

I--f-f--I 

|ALPHA j TM jGAMMA,B*10101101 * j 

L-J.-JL_ J 

Character Self-Defining Term . A character 
self-defining term consists of one to three 
characters enclosed by apostrophes. It 
must be preceded by the letter C. All 
letters, decimal digits, and special 
characters may be used in a character term. 
In addition, any of the remainder of the 
256 punch combinations may be designated in 
a character self-defining term. Examples 
of character self-defining terms are as 
follows: 

C*/' C* * (blank) 

C'ABC' C'13 * 

Because of the use of apostrophes in the 
assembler language and ampersands in the 
macro language as syntactic characters, the 
following rule must be observed when using 
these characters in a character term. 


Location Counter Reference 


A location counter is used to assign 
storage addresses to program statements. 

It is the assembler program*s equivalent of 
the instruction counter in the computer. 

As each machine instruction or data area is 
assembled, the location counter is first 
adjusted to the proper boundary for the 
item, if adjustment is necessary, and then 
incremented by the length of the assembled 
item. Thus, it always points to the next 
available location. If the statement is 
named by a symbol, the value assigned to 
the symbol is the value of the location 
counter after boundary adjustment, but 
before addition of the length. 


The assembler maintains a location 
counter for each control section of the 
program and manipulates each location 
counter as previously described. Source 
statements for each section are assigned 
addresses from the location counter for 
that section. The location counter for 
each successively declared control section 
assigns locations in consecutively higher 
areas of storage. If a program has 
multiple control sections, all statements 
identified as belonging to the first 
control section will be assigned from the 
location counter for section 1, the 
statements for the second control section 
will be assigned from the location counter 
for section 2, etc. This procedure is 
followed whether the statements from 
different control sections are interspersed 
or written in control section sequence. 


The location counter setting can be 
controlled by using the START and ORG 
assembler instructions, which are described 
in Sections 3 and 5, respectively. The 
counter affected by either of these 
assembler instructions is the counter for 
the control section in which they appear. 
The maximum value for the location counter 
is 2 a4 -1. 



For each apostrophe or ampersand desired 
in a character term, two apostrophes or 
ampersands must be written. For example, 
the character value A*# would be written as 
C*A*'#*, while an apostrophe followed by a 
blank and another apostrophe would be 
written as C* * * 

Each character in the character sequence 
is assembled as its eight-bit code 
equivalent (see Appendix A). The two 
apostrophes or ampersands that must be used 
to represent a single apostrophe or 
ampersand within the character sequence are 
assembled as a single apostrophe or 
ampersand. 


The programmer may refer to the current 
value of the location counter at any place 
in a program, by using an asterisk in an 
operand. The asterisk represents the 
location of the first byte of currently 
available storage (i.e., after any required 
boundary adjustment) . Using an asterisk in 
a machine instruction statement is the same 
as placing a symbol in the name field of 
the statement and then using that symbol as 
an operand of the statement. Because a 
location counter is maintained for each 
control section, a location counter 
reference designates the location counter 
for the section in which the reference 
appears. 



24 Part 1: Introduction to the Assembler Language 






A reference to the location counter may 
be made in a literal address constant 
(i.e., the asterisk may be used in an 
address constant specified in literal 
form). The address of the instruction 
containing the literal is used for the 
value of the location counter . A location 
counter reference may not be used in a 
statement which requires the use of a 
predefined symbol, with the exception of 
the EQU and ORG assembler instructions. 


Literals 


A literal term is one of three basic ways 
to introduce data into a program. It is 
simply a constant preceded by an equal sign 
(=) . 


A literal represents data rather than a 
reference to data. The appearance of a 
literal in a source statement directs the 
assembler program to assemble the data 
specified by the literal, store this data 
in a "literal pool", and place the value 
(address) of the storage field containing 
the data in the operand field of the 
assembled statement. 

Literals provide a means of entering 
constants (such as numbers for calculation, 
addresses, indexing factors, or words or 
phrases for printing out a message) into a 
program by specifying the constant in the 
operand of the instruction in which it is 
used. This is in contrast to using the DC 
assembler instruction to enter the data 
into the program, and then using the name 
of the DC instruction in the operand. Only 
one reference to a literal is allowed in a 
machine instruction statement. 

A literal term may not be combined with 
any other terms. 

A literal may not be used as the 
receiving field of an instruction that 
modifies storage. 

A literal may not be specified in an 
address constant (see "DC—Define Constant" 
in Section 5) . A literal may not be 
specified in a shift instruction or an I/O 
instruction (HIO, HDV, SIO, SIOF, STIDC, 
TIO) . 

A literal may not have an explicit base 
or an explicit index when specified in an 
instruction. 

The instruction coded below diows one 
use of a literal. 


r-T~- t- 1 

|Name |Operation|Operand | 

j.- •+ - 4 - 1 

jGAMMA |L j10,=F r 274 * | 

l_i-J-j 

The statement GAMMA is a load 
instruction using a literal as the second 
operand. When assembled, the second 
operand of the instruction will be the 
address at which the binary value 
represented by F*274 r is stored. 

(tote: If the type subfield of the operand 
is C, X, or B and the equal sign (=) is 
omitted, you have not written a literal but 
a self-defining term which the assembler may 
assemble without error (see "Using Self- 
Defining Terms"}. 

In general, literals may be used 
wherever a storage address is permitted as 
an operand. They may not, however, be used 
in any assembler instruction. Literals are 
considered relocatable, because the address 
of the literal, rather than the literal 
itself, will be assembled in the statement 
that employs a literal. The assembler 
generates the literals, collects them, and 
places them in a specific area of storage, 
as explained in the subsection "The Literal 
Pool." A literal is not to be confused 
with the immediate data in an SI 
instruction. Immediate data is assembled 
into the instruction. 

Literal Format . The assembler requires a 
description of the type of literal being 
specified as well as the literal itself. 

This descriptive information assists the 
assembler in assembling the literal 
correctly. The descriptive portion of the 
literal must indicate the format in which 
the constant is to be assembled. It may 
also specify the length the constant is to 
occupy. 

The method of describing and specifying 
a constant as a literal is nearly identical 
to the method of specifying it in the 
operand of a DC assembler instruction. The 
major difference is that the literal must 
start with an equal sign (=) , which 
indicates to the assembler that a literal 
follows. See the discussion of the DC 
assembler instruction operand format 
(Section 5) for the means of specifying a 
literal. The type of literal designated in 
an instruction is not checked for 
correspondence with the operation code of 
the instruction. 

Some examples of literals are: 

=A (BETA) - address constant literal. 

=F*1234* - a fixed-point number with a 

length of four bytes. 

=C*ABC* - a character literal. 
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The Literal Pool . The literals processed 
by the assembler are collected and placed 
in a special area called the literal pool 
and the location of the literal, rather 
than the literal itself, is assembled in 
the statement employing a literal. The 
positioning of the literal pool may be 
controlled by the programmer, if he so 
desires. Unless otherwise specified, the 
literal pool is placed at the end of the 
first control section. 


For ease in following the example, the 
length attributes of Al and B2 are 
mentioned. 


r- t--- t 


(Name 

L 

(Operation(Operand 

-L _L 

1A1 

|DS 

(CL8 

j B2 

| DC 

|CL2'AB * 

jHIORD 

|MVC 

j Al (L'B2) ,B2 

jLOORD 

|MVC 

|AHL'A1-L'B2 (L'B2) ,B2 


The programmer may also specify that 
multiple literal pools be created. 

However, the sequence in which literals are 
ordered within the pool is controlled by 
the assembler. Further information on 
positioning the literal pool (s) is in 
Section 5 under "LTORG—Begin Literal 
Pool." 

Duplicate Literals . If duplicate literals 
occur within one literal pool, only one 
literal is stored. Literals are considered 
duplicates only if their specifications are 
identical. A literal will be stored, even 
if it appears to duplicate another literal, 
if it is an A-type address constant 
containing any reference to the location 
counter . 


The following examples illustrate the 
foregoing rules: 


X'FOM 
C'O* j 
XL3* O '\ 
HL3* O') 
A (*+4) \ 
A (**4) J 


Both are stored. 


Both are stored. 


Both are stored. 


A1 names a storage field eight bytes in 
length and is assigned a length attribute 
of eight. B2 names a character constant 
two bytes in length and is assigned a 
length attribute of two. The statement 
named HIORD moves the contents of B2 into 
the leftmost two bytes of A1. The term 
L* B2 in parentheses provides the length 
specification required by the instruction. 
When the instruction is assembled, the 
length is placed in the proper field of the 
machine instruction. 

The statement named LOORD moves the 
contents of B2 into the rightmost two bytes 
of A1. The combination of terms 
Al+L*Al-L*B2 results in the addition of the 
length of Al to the beginning address of 
Al, and the subtraction of the length of B2 
from this value. The result is the address 
of the seventh byte in field Al. The 
constant represented by B2 is moved into Al 
starting at this address. L'B2 in 
parentheses provides length specification 
as in HIORD. 

Note : The length attribute of * is equal 
to the length of the instruction in which 
it appears, except in an EQU to * 
instruction where the length attribute is 
1 . 


X'FFFF' 

X'FFFF* 


Identical; the first is stored. 


EXPRESSIONS 


Symbol Length Attribute Reference 

The length attribute of a symbol may be 
used as a term by coding L* followed by the 
symbol, as in: 

L* BETA 

The length attribute of BETA will be 
substituted for the term. The following 
example illustrates the use of L' symbol in 
moving a character constant into either the 
high-order or low-order end of a storage 
field. 


Expressions, which are used in coding 
operand entries for assembler language 
statements, are composed of either a single 
term or an arithmetic combination of terms 
(see Figure 3) . Arithmetically combined 
terms, enclosed in parentheses, may be use 
in combination with terms outside the 
parentheses. For example: 

14+BETA- (GAMMA-LAMBDA) 

When terms in parentheses occur in 
combination with other terms, like 
(GAMMA-LAMBDA) in the example, the 
parenthesized terms are reduced first to a 
single value. This value may be absolute 
or relocatable, depending on the 
combination of terms. This value then is 
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used in reducing the rest of the 
combination to another single value. 


Parenthesized terms may be included 
within another set of terms in parentheses. 
For example: 

A+B- (C+D- (E+F) +10) 

This expression has two levels of 
parentheses. A level of parentheses is a 
left parenthesis and its matching right 
parenthesis. One level of parentheses 
surrounds E+F. The next higher level of 
parentheses surrounds C+D-(E+F)+1 0. The 
innermost set of terms in parentheses (the 
lowest level) is evaluated first. 


The following are examples of valid 
expressions: 


AREA1+X* 2D* 

*+32 

N-25 

FIELD+332 

FIELD 

(EXIT-ENTRY* 1) +GO 
=F*1234* 


BETA*10 
B'101* 

C* ABC* 

29 

L*FIELD 

LAMBDA+GAMMA 

TEN/TWO 


ALPHA-BETA/ (10+AREA*L*FIELD) -100 
A* (A* (A* (A+1) +3* (B-3) )) 


The rules for coding expressions are: 

1. An expression may not start with an 
arithmetic operator, that is, + - / *. 
Therefore, the expression -A+BETA is 
invalid. However, the expression 
0-A+BETA is valid. 

2. An expression may not contain two 
terms or two operators in succession. 

3. An expression may not consist of more 
than 16 terms. 

4. An expression may not have more than 
five levels of parentheses. 

5. A multiterm expression may not contain 
a literal. 


Evaluation of Expressions 


A single term expression, e.g., 29, BETA, 

*, L*SYMBOL, takes on the value of the term 
involved. 

A multiterm expression, e.g., BETA+10, 
ENTRY-EXIT, 25*10+A/B, is reduced to a 
single value, as follows: 

1. Each term is given its value. 


2. Arithmetic operations are performed 
left to right. Multiplication and 
division are done before addition and 
subtraction, e.g., A+B*C is evaluated 
as A+ (B*C), not (A+B)*C. The computed 
result is the value of the expression. 

3. Every expression is computed to 32 
bits, and then truncated to the 
rightmost 24 bits. 

4. Division always yields an integer 
result; any fractional portion of the 
result is dropped. E.g., 1/2*10 
yields a zero result, whereas 10*1/2 
yields 5. 

5. Division by zero is valid and yields a 
zero result. 

Parenthesized expressions used in an 
expression are processed before the rest of 
the terms in the expression, e.g., in the 
expression A+BETA* (CON-10), the term CON-10 
is evaluated first and the resulting value 
is used in computing the final value of the 
expression. 

Negative values are carried in two's 
complement form. Final values of 
expressions are the rightmost 24 bits of 
the results. Intermediate results have a 
range of -2 3fl through 2 3 *-1. However, the 
value of an expression before truncation 
must be in the range -2 2 ** through 2 2< *-1 or 
the results will be meaningless. A 
negative result is considered to be a 
3-byte positive value. 

Note : In A-type address constants, the 
full 32 bit final result is truncated on 
the left to fit the specified or implied 
length of the constant. 


Absolute and Relocatable Expressions 


An expression is called absolute if its 
value is unaffected by program relocation. 

An expression is called relocatable if 
its value changes upon program relocation. 

The two types of expressions, absolute 
and relocatable, take on these 
characteristics from the term or terms 
composing them. The following material 
discusses this relationship. 

Absolute Expression . An absolute 
expression may be an absolute term or any 
arithmetic combination of absolute terms. 

An absolute term may be an absolute symbol, 
any of the self-defining terms, or the 
length attribute reference. As indicated 
in Figure 3, all arithmetic operations are 
permitted between absolute terms. 
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An absolute expression may contain 
relocatable terms (RT)—alone or in 
combination with absolute terms (AT)—under 
the following conditions: 


Relocatable Expressions . A relocatable 
expression is one whose value would change 
by n if the program in which it appears is 
relocated n bytes away from its originally 
assigned area of storage. 


1. There must be an even number of 
relocatable terms in the expression. 

2. The relocatable terms must be paired. 
Each pair of terms must have the same 
relocatability attribute, i.e., they 
appear in the same control section in 
this assembly (see "Program Sectioning 
and Linking", Section 3). Each pair 
must consist of terms with opposite 
signs. The paired terms do not have 
to be contiguous, e.g., RT+AT-RT. 

3. No relocatable expression may enter 
into a multiply or divide operation. 
Thus, RT-RT*10 is invalid. However, 
(RT-RT)*10 is valid. 

The pairing of relocatable terms (with 
opposite signs and the same relocatability 
attribute) cancels the effect of 
relocation. Therefore the value 
represented by the paired terms remains 
constant, regardless of program relocation. 
For example, in the absolute expression 
A-Y+X, A is an absolute term, and X and Y 
are relocatable terms with the same 
relocatability attribute. If A equals 50, 

Y equals 25, and X equals 10, the value of 
the expression would be 35. If X and Y are 
relocated by a factor of 100 their values 
would then be 125 and 110. However, the 
expression would still evaluate as 35 
(50-125+110=35) . 

An absolute expression reduces to a 
single absolute value. 

The following examples illustrate 
absolute expressions. A is an absolute 
term; X and Y are relocatable terms, with 
the same relocatability attribute. 

A-Y+X 

A 

A*A 

X-Y+A 

*-Y (a reference to the location counter 
must be paired with another 
relocatable term from the same control 
section, i.e., with the same 
relocatability attribute) 


A relocatable expression may be a 
relocatable term. A relocatable expression 
may contain relocatable terms—alone or in 
combination with absolute terms—under the 
following conditions: 

1. There must be an odd number of 
relocatable terms. 

2. All the relocatable terms but one must 
be paired. Pairing is described in 
"Absolute Expression.* 

3. The unpaired term must not be directly 
preceded by a minus sign. 

4. No relocatable term may enter into a 
multiply or divide operation. 

A relocatable expression reduces to a 
single relocatable value. This value is 
the value of the odd relocatable term, 
adjusted by the values represented by the 
absolute terms and/or paired relocatable 
terms associated with it. 


For example, in the expression W-X+W-10, 
W and X are relocatable terms with the same 
relocatability attribute. If initially W 
equals 10 and X equals 5, the value of the 
expression is 5. However, upon relocation 
this value will change. If a relocation 
factor of 100 is applied, the value of the 
expression is 105. Note that the value of 
the paired terms, W-X, remains constant at 
5 regardless of relocation. Thus, the new 
value of the expression, 105, is the result 
of the value of the odd term (W) adjusted 
by the values of W-X and 10. 

The following examples illustrate 
relocatable expressions. A is an absolute 
term, W and X are relocatable terms with 
the same relocatability attribute, Y is a 
relocatable term with a different 
relocatability attribute. 


Y-32+A W-X++ 

W-X+Y 

* (reference to 
location counter ) 


=F*1234'(literal) 
A+A+W-W+Y 
W-X+W 
Y 
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Section 3. Addressing-Program Sectioning and Linking 


Addressing 


The IBM System/360 Operating System 
addressing technigue reguires the use of a 
base register, which contains the base 
address, and a displacement, which is added 
to the contents of the base register. The 
programmer may specify a symbolic address 
and request the assembler to determine its 
storage address in terms of a base register 
and a displacement. The programmer may 
rely on the assembler to perform this 
service for him by indicating which general 
registers are available for assignment and 
what values the assembler may assume each 
contains. The programmer may use as many 
or as few registers for this purpose as he 
desires. The only requirements are that, 
at the point of reference, a register 
containing an address from the same control 
section is available, and that this address 
is less than or equal to the address of the 
item to which the reference is being made. 
The difference between the two addresses 
may not exceed 4095 bytes. 


ADDRESSES—EXPLICIT AND IMPLIED 


An address is composed of a displacement 
plus the contents of a base register. (In 
the case of RX instructions, the contents 
of an index register are also used to 
derive the address.) 


The programmer writes an explicit 
address by specifying the displacement and 
the base register number. In designating 
explicit addresses a base register may not 
be combined with a relocatable symbol. 


He writes an implied address by 
specifying an absolute or relocatable 
address. The assembler has the facility to 
select a base register and compute a 
displacement, thereby generating an 
explicit address from an implied address, 
provided that it has been informed (1) what 
base registers are available to it and (2) 
what each contains. The programmer conveys 
this information to the assembler through 
the USING and DROP assembler instructions. 


BASE REGISTER INSTRUCTIONS 


The USING and DROP assembler instructions 
enable programmers to use expressions 
representing implied addresses as operands 
of machine instruction statements, leaving 
the assignment of base registers and the 
calculation of displacements to the 
assembler. 


In order to use symbols in the operand 
field of machine instruction statements, 
the programmer must (1) indicate to the 
assembler, by means of a USING statement, 
that one or more general registers are 
available for use as base registers, (2) 
specify, by means of the USING statement, 
what value each base register contains, and 
(3) load each base register with the value 
he has specified for it. 


Having the assembler determine base 
registers and displacements relieves the 
programmer of separating each address into 
a displacement value and a base address 
value. This feature of the assembler will 
eliminate a likely source of programming 
errors, thus reducing the time required to 
check out programs. To take advantage of 
this feature, the programmer uses the USING 
and DROP instructions described in this 
subsection. The principal discussion of 
this feature follows the description of 
both instructions. 


USING—Use Base Address Register 


The USING instruction indicates that one or 
more general registers are available for 
use as base registers. This instruction 
also states the base address values that 
the assembler may assume will be in the 
registers at object time. Note that a 
USING instruction does not load the 
registers specified. It is the 
programmer's responsibility to see that the 
specified base address values are placed 
into the registers. Suggested loading 
methods are described in the subsection 
"Programming with the USING Instruction." 
The typical form of the USING instruction 
statement is: 
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r-*-T-1- 1 

| Name JOperation!Operand j 

k -f-f- 1 

|Sequence |USING jFrom 2-17 expressions! 
jsymbol orj jof the form v,r1, j 

jnot used j jr2,r3,...,r16 | 

i—,._x-x_j 


Operand v must be an absolute or 
relocatable expression with a value ranging 
from -2 24 to +2 24 -1. No literals are 
permitted. Operand v specifies a value 
that the assembler can use as a base 
address. The other operands must be 
absolute expressions. The operand rl 
specifies the general register that can be 
assumed to contain the baseV address 
represented by operand v. Operands r2, r3, 
r4,... specify registers that can be 
assumed to contain v+4096, v+8192, 
v+12288,..., respectively. The values of 
the operands rl, r2, r3,..., r16 must be 
between 0 and 15. For example, the 
statement: 


2. Register 0 must be specified as 
operand rl. 

The assembler assumes that register 0 
contains zero. Therefore, regardless of 
the value of operand v, it calculates 
displacements as if operand v were absolute 
or relocatable zero. The assembler also 
assumes that subsequent registers specified 
in the same USING statement contain 4096, 
8192, etc. 


Note : If register 0 is used as a base 

register, the program is not relocatable, 
despite the fact that operand v may be 
relocatable. The program can be made 
relocatable by: 

1. Replacing register 0 in the USING 
statement. 

2. Loading the new register with a 
relocatable value. 

3. Reassembling the program. 


r-r-i-1 

|Name |Operation!Operand [ 

j---j---j--j DROP—Drop Base Register 

| jUSING |*,12,13 J 

i-x-x-j 


tells the assembler it may assume that the 
current value of the location counter will 
be in general register 12 at object time, 
and that the current value of the location 
counter, incremented by 4096, will be in 
general register 13 at object time. 

If the programmer changes the value in a 
base register currently being used, and 
wishes the assembler to compute 
displacement from this value, the assembler 
must be told the new value by means of 
another"USING statement. In the following 
sequence the assembler first assumes that 
the value of ALPHA is in register 9. The 
second statement then causes the assembler 
to asstime that ALPHA* 1000 is the value in 
register 9. 

r- t -r--i 

|Name |Operation!Operand J 


The DROP instruction specifies a previously 
available register that may no longer be 
used as a base register. The typical form 
of the DROP instruction statement is as 
follows: 

r- 1 -t-1 

JName (Operation|Operand | 

I-- + - + -^ 

jSequence JDROP JUp to 16 absolute J 

(symbol orj {expressions of the j 

jnot used j (form r1,r2, j 

I ! Jr3,...,r16 1 

l-J_L---1 

The expressions indicate general 
registers previously specified in a USING 
statement that are now unavailable for base 
addressing. The following statement, for 
example, prevents the assembler from using 
registers 7 and 11: 




|USING 

|ALPHA,9 

1 • 

1 

i • 

| 

|USING 

jALPHA*1000,9 


-X-- -- 


If the programmer has to refer to the 
first 4096 bytes of storage, he can use 
general register 0 as a base register 
subject to the following conditions: 


r- t-t- 1 

(Name JOperation|Operand | 

*-+-+- 

( |DROP (7,11 | 

i-1-x-j 

It is not necessary to use a DROP 
statement when the base address in a 
register is changed by a USING statement; 
nor are DROP statements needed at the end 
of the source program. 


1. The value of operand v must be either 
an absolute or relocatable zero or 
simply relocatable. 


A register made unavailable by a DROP 
instruction can be made available again by 
a subsequent USING instruction. 



o 

4,^ 
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PROGRAMMING WITH THE USING INSTRUCTION 


The USING (and DROP) instructions may be 
used anywhere in a program, as often as 
needed, to indicate the general registers 
that are available for use as base 
registers and the base address values the 
assembler may assume each contains at 
execu ion time. Whenever an address is 
specified in a machine instruction 
statement, the «_ssembler determines whether 
there is an available register containing a 
suitable base address. The USING 
instruction establishes addressability at 
assembly time, assuming that the registers 
assigned as base registers have been loaded 
with correct base addresses. Any reference 
to relocatable or absolute terms, which are 
to be assembled into the base displacement 
form, such as names in the operand of a 
machine instruction or S-type address 
constant, must come after the pertinent 
USING instruction that makes the terms 
addressable. References to terms 
relocatable or otherwise in the operand of 
an A-type or Y-type address constant do not 
have to be preceded by a USING statement. 

A register is considered available for a 
relocatable address if it was assigned a 
relocatable value that is in the same 
control section as the address. A register 
assigned an absolute value is available for 
addressing absolute locations only. In 
either case the base address is considered 
suitable only if it is less than or equal 
to the address of the item to which the 
reference is made. The difference between 
the two addresses may not exceed 4095 
bytes. In calculating the base register to 
be used, the assembler always uses the 
available register giving the smallest 
displacement. If there are two registers 
with the same value, the highest numbered 
register is used. 


r- t-t- 

| Name |Operation|Operand 

[ - A - 4 - 

jBEGIN |BALR |2,0 

j jUSING j *,2 

j ALPHA | » j 


| BETA 

I 


| END 


|BEGIN 
.J.- 


A 

I 

i 

I 

I 


In the preceding sequence, the BALR 
instruction loads register 2 with the 
address of the first storage location 
immediately following. In this case, it is 
the address of the instruction named ALPHA. 
The USING instruction indicates to the 
assembler that register 2 contains this 
location. When employing this method, the 
USING instruction must immediately follow 
the BALR instruction. No other USING or 
load instructions are required if the 
location named BETA is within 4095 bytes of 
ALPHA. 

In Figure 4 the BALR and LM instructions 
load registers 2-5. The USING instruction 
indicates to the assembler that these 
registers are available as base registers 
for addressing a maximum of 16,384 
consecutive bytes of storage, beginning 
with the location named HERE. The number 
of addressable bytes may be increased or 
decreased by altering the number of 
registers designated by the USING and LM 
instructions and the number of address 
constants specified in the DC instruction- 


Note : Care must be taken when assigning 

base registers to avoid using, except under 
special circumstances: 


1. General registers 0, 1, 13, 14 and 15, 
as they are used by the system. 

2. Any register used explicitly or 
implicitly by a machine instruction. 


r 

|Name 

IbeGIn- 

—, -if—-- - — — - -- — - - - 

|Operation|Operand 

j. j. 

1 BALR 

1 2,0 

1 

j HERE 

1 

j BASEADDR 
jFIRST 

1 

|USING 
| LM 
|B 
j DC 

1 • 

! • 

|HERE,2,3,4,5 
j 3,5,BASEADDR 
|FIRST 

j A (HERE+4096,HERE+819 2,HERE+12288) 

1 

1 

1 

|LAST 

1 

L 

I* 

1 • 

j END 
r 

1 

1 

|BEGIN 

. i. .. . 

Figure 4. 

Multiple 

Base Register Assignment 
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RELATIVE ADDRESSING provided under the heading "Addressing 

~ External Control Sections." 


Relative addressing is the technique of 
addressing instructions and data areas by 
designating their location in relation to 
the location counter or to some symbolic 
location. This type of addressing is 
always in bytes, never in bits, words, or 
instructions. Thus, the expression *+4 
specifies an address that is four bytes 
greater than the current value of the 
location counter. in the sequence of 
instructions shown in the following 
example, the location of the CR machine 
instruction can be expressed in two ways, 
ALPHA+2 or BETA-4, because all of the 
mnemonics in the example are for 2-byte 
instructions in the RR format. 

r- t -r- 

|Name |Operation|Operand 

f-+-f- 

|ALPHA |LR |3,4 

I | CR | 4,6 

j jBCR |1,14 

jBETA j AR |2,3 

l_i.-i._ 


Program Sectioning and Linking 


It is often convenient, or necessary, to 
write a large program in sections. The 
sections may be assembled separately, then 
combined subsequently into one program. 

The assembler provides facilities for 
creating multisectioned programs and 
symbolically linking separately assembled 
programs or program sections. 

Sectioning a program is optional, and 
many programs can best be written without 
sectioning them. The programmer writing an 
unsectioned program need not concern 
himself with the subsequent discussion of 
program sections, which are called control 
sections. He need not employ the CSECT 
instruction, which is used to identify the 
control sections of a multisection program. 
Similarly, he need not concern himself with 
the discussion of symbolic linkages if his 
program neither requires a linkage to nor 
receives a linkage from another program. 

He may, however, wish to identify the 
program and/or specify a tentative starting 
location for it, both of which may be done 
by using the START instruction. He may 
also want to employ the dummy section 
feature obtained by using the DSECT 
instruction. 

Note : Program sectioning and linking is 

closely related to the specification of 
base registers for each control section. 
Sectioning and linking examples are 


CONTROL SECTIONS 


The concept of program sectioning is a 
consideration at coding time, assembly 
time, and load time. To the programmer, a 
program is a logical unit. He may want to 
divide it into sections called control 
sections; if so, he writes it in such a way 
that control passes properly from one 
section to another regardless of the 
relative physical position of the sections 
in storage. A control section is a block 
of coding that can be relocated, 
independently of other coding, at load time 
■j without altering or impairing the operating 
j logic of the program. It is normally 
-j identified by the CSECT instruction, 
j However, if it is desired to specify a 
j tentative starting location, the START 
| instruction may be used to identify the 
J first control section. 

j 

To the assembler, there is no such thing 
as a program; instead, there is a source 
module, which consists of one or more 
control sections. (However, the terms 
source module and program are often used 
interchangeably.) An unsectioned program 
is treated as a single control section. To 
the linkage editor, there are no programs, 
only control sections that must be 
fashioned into one or more phases. 

The output from the assembler is called 
an object module. It contains data 
required for linkage editor processing. 

The external symbol dictionary, which is 
part of the object module, contains 
information the linkage editor needs in 
order to complete cross-referencing between 
control sections, as it combines them into 
a program. The linkage editor can take 
control sections from various assemblies 
and combine them properly with the help of 
the corresponding external symbol 
dictionaries. Successful combination of 
separately assembled control sections 
depends on the techniques used to provide 
symbolic linkages between the control 
sections. 

Whether the programmer writes an 
unsectioned program, a multisection 
program, or part of a multisection program, 
he still knows what eventually will be 
entered into storage, because he has 
described storage symbolically. He may not 
know where each section appears in storage, 
but he does know what storage contains. 
There is no constant relationship between 
control sections. Thus, knowing the 
location of one control section does not 
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make another control section addressable by 
relative addressing techniques. 

There is a limit to the number of 
external symbol dictionary entries. The 
total number of control sections (named, 
unnamed, and common control sections), 
dummy sections, unique symbols in EXTRN and 
WXTRN statements, and V-type address 
constants may not exceed 255. (The V-type 
address constant is described in Section 5 
under "DC — Define Constant"; the other 
external symbols are described in this 
section.) If the same symbol appears both 
in v-type address constant and in the name 
field of a START, CSECT, or DSECT 
statement, it is counted as two symbols. 


Control Section Location Assignment 


Control section contents can be intermixed 
because the assembler provides a location 
counter for each control section. Control 
sections are assigned starting locations 
consecutively, in the same order as the 
control sections first occur in the 
program. Each control section subsequent 
to the first begins at the next available 
doubleword boundary. 


FIRST CONTROL SECTION 


The first control section of a program has 
the following special properties. 

1- The initial value of its location 
counter may be specified as an 
absolute value. 

2. It normally contains the literals 
requested in the source module, 
although their positioning can be 
altered. This is further explained 
under the discussion of the LTORG 
assembler instruction. 


START--Start Assembly 


The START instruction may be used to give a 
name to the first (or only) control section 
of a source module. It may also be used to 
specify the initial value of the location 
counter for the first control section of 
the module. The typical form of the START 
instruction statement is as follows: 


I-T-T-1 

|Name joperation(Operand | 

j--j.-+-( 

|Any symbol jSTART JA self-defining j 

ior not used ( jterm or not 1 

I I |used | 

i-j_ x ___i 

If a symbol names the START instruction, 
the symbol is established as the name of 
the control section. If not, the control 
section is considered to be unnamed. All 
subsequent statements are assembled as part 
of that control section. This continues 
until an instruction identifying a 
different control section is encountered. 

A CSECT instruction named by the same 
symbol that names a START instruction is 
considered to identify the continuation of 
the control section first identified by the 
START. Similarly, an unnamed CSECT that 
occurs in a program initiated by an unnamed 
START is considered to identify the 
continuation of the unnamed control 
section. 

The symbol in the name field is a valid 
relocatable symbol whose value represents 
the address of the first byte of the 
control section. It has a length attribute 
of one. 

The assembler uses the self-defining 
term specified by the operand as the 
initial value of the location counter of 
the program. This value should be 
divisible by eight. For example, either of 
the following statements: 

r- 7 - T - 1 

|Name |Operation!Operand J 

I-i--4--j 

j PR0G2 |START J2040 j 

JPR0G2 jSTART |X'7F8* j 


could be used to assign the name PR0G2 to 
the first control section and to set the 
initial value of the location counter to 
2040. If the operand is omitted, the 
assembler sets the initial value to zero. 
The location counter is set at the next 
doubleword boundary when the value of the 
START operand is not divisible by 8. 

Note : The START instruction may not be 
preceded by any type of assembler language 
statement that may either affect or depend 
upon the setting of the location counter. 


CSECT—Identify Control Section 


The CSECT instruction identifies the 
beginning or the continuation of a control 
section. The typical form of the CSECT 
instruction statement is as follows: 
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r -I- T - 1 

(Name jOperation)Operand | 

j.--f-f--I 

|Any symbol |CSECT (Not used; should J 

|or not used | jnot be present j 

l_ x _ l _j 

If a symbol names the CSECT instruction, 
the symbol is established as the name of 
the control section; otherwise the section 
is considered to be unnamed. All 
statements following the CSECT are 
assembled as part of that control section 
until a statement identifying a different 
control section is encountered (i.e., 
another CSECT or a DSECT instruction) . 

The symbol in the name field is a valid 
relocatable symbol whose value represents 
the address of the first byte of the 
control section. It has a length attribute 
of one. 

Several CSECT statements with the same 
name may appear within a source module. 

The first is considered to identify the 
beginning of the control section; the rest 
identify the resumption of the section. 
Thus, statements from different control 
sections may be interspersed. They are 
properly assembled (assigned contiguous 
storage locations) as long as the 
statements from the various control 
sections are identified by the appropriate 
CSECT instructions. 

Under the Tape Operating System (TOS) a 
completely empty control section (CSECT) is 
flagged in error. 


Unnamed Control Section 


If neither a named CSECT instruction nor 
START instruction appears at the beginning 
of the program, the assembler determines 
that it is to assemble an unnamed control 
section as the first (or only) control 
section. There may be only one unnamed 
control section in a program. If one is 
initiated and is then followed by a named 
control section, any subsequent unnamed 
CSECT statements are considered to resume 
the unnamed control section. If it is 
desired to write a small program that is 
unsectioned, the program does not need to 
contain a CSECT instruction. 


DSECT—Identify Dummy Section 


A dummy section represents a control 
section that is assembled but is not part 
of the object program. A dummy section is 


a convenient means of describing the layout 
of an area of storage without actually 
reserving the storage. (It is assumed that 
the storage is reserved either by some 
other part of this assembly or else by 
another assembly.) The DSECT instruction 
identifies the beginning or resumption of a 
dummy section. More than one dummy section 
may be defined per assembly, but each must 
be named. The typical form of the DSECT 
instruction statement is as follows: 


r- t-T-1 

JName {Operation|Operand | 


J.- 

jAn ordinary 

4 - 

jDSECT 

| Not used; should 

jsymbol or a 

1 

jnot be present 

(variable 

1 

1 

j symbol 

L _ 

1 

.x — 

1 

X - - 


The symbol in the name field is a valid 
relocatable symbol whose value represents 
the first byte of the section. It has a 
length attribute of one. 

Program statements belonging to dummy 
sections may be interspersed throughout the 
program or may be written as a unit. In 
either case, the appropriate DSECT 
instruction should precede each set of 
statements. When multiple DSECT 
instructions with the same name are 
encountered, the first is considered to 
initiate the dummy section and the rest to 
continue it. 

Symbols that name statements in a dummy 
section may be used in USING instructions. 
Therefore, they may be used in program 
elements (e.g., machine instructions and 
data definitions) that specify storage 
addresses. An example illustrating the use 
of a dummy section appears subsequently 
under "Addressing Dummy Sections" in this 
section. 

Note : A symbol that names a statement in a 
dummy section may be used in an A-type 
address constant only if it is paired with 
another symbol (with the opposite sign) 
from the same dummy section. 

Dummy Section Location Assignment . A 
location counter is used to determine the 
relative locations of named program 
elements in a dummy section. The location 
counter is always set to zero at the 
beginning of the dummy section, and the 
location values assigned to symbols that 
name statements in the dummy section are 
relative to the initial statement in the 
section. 

Addressing Dummy Sections . The programmer 
may wish to describe the format of an area 
whose storage location will not be 
determined until the program is executed. 
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He can describe the format of the area in a 
dummy section, and he can use symbols 
defined in the dummy section as the 
operands of machine instructions. To 
effect references to the storage area, he 
does the following: 

1. Provides a.USING statement specifying 
both a general register that the 
assembler can assign to the machine 
instructions as a base register and a 
value from the dummy section that the 
assembler may assume the register 
contains. 

2* Ensures that the same register is 

loaded with the actual address of the 
storage area. 

The values assigned to symbols defined 
in a dummy section are relative to the 
initial statement of the section. 


Thus, all machine instructions which 
refer to names defined in the dummy section 
will, at execution time, refer to storage 
locations, relative to the address loaded 
into the register. 

An example is shown in the following 
coding. Assume that two independent 
modules (assembly 1 and assembly 2) have 
been loaded and are to be executed as a 
single overall program. Assembly 1 is an 
input routine that places a unit record in 
a specified area of storage, and places the 
address of that area in register 3. The 
input area is aligned on a fullword 
boundary. Then assembly 1 branches to 
assembly 2. Assembly 2 processes the 
record, which has the following format: 


Columns 

1 

2 

3 and 4 
5 through 8 


Content 
INCODE 
blank 
INPUTA 
INPUTB 


The coding shown in the example is from 
assembly 2. 

The input area is described in assembly 
2 by the DSECT control section named 
INAREA. Portions of the input area (i.e., 
record) that the programmer wishes to work 
with are named in the DSECT control section 
as shown. The assembler instruction USING 
INAREA,3 designates general register 3 as 
the base register to be used in addressing 
the DSECT control section, and that general 
register 3 is assumed to contain the 
address of INAREA. 


Assembly 1, during execution, loads the 
actual beginning address of the input area 
in general register 3. Because the symbols 
used in the DSECT section are defined 
relative to the initial statement in the 


section, the address values they represent, 
will, at the time of program execution, be 
the actual storage locations of the input 
area. 

r - T - T -, 



The programmer must ensure that a 
section of code in his program is actually 
described by the dummy section which 
references it i.e., that data is properly 
aligned in both places. The DSECT named 
INAREA in the previous example adequately 
describes, the section of code introduced 
into assembly 1, as it was aligned on a 
fullword boundary. Further, WORKA and 
WORKB will be aligned and contiguous to 
each other in the same way as INPUTA and 
INPUTB are. 


COM—Define Blank Common Control Section 


The COM assembler instruction identifies 
and reserves a common area of storage that 
may be referred to by independent modules 
that have been linked and loaded for 
execution as one overall program. 

Only one blank common control section 
may be designated in a source module. 
However, more than one COM statement may 
appear within a module. The first 
identifies the beginning of the blank 
common control section; the rest identify 
the resumption of the section. 
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When several modules are loaded, each 
designating a common control section, the 
amount of storage reserved is equal to the 
longest common control section. The form 
is: 


r- r -,- n 

|Name |Oper ation|Operand | 

f - f - f -^ 

(Sequence jCOM |Not used; should | 

jsymbol orj (not be present j 

jnot used j j j 

L-X-J.---J 

The common area may be broken up into 
subfields through use of the DS and DC 
assembler instructions. Names of subfields 
are defined relative to the beginning of 
the common section, as in the DSECT control 
section. 

It is necessary to establish 
addressability relative to a named 
statement within COM since the COM 
statement itself cannot have a name. In 
the following example, addressability to 
the common area of storage is established 
relative to the named statement XYZ. 


r- t-1- 

(Name (Operation(Operand 

F--- f -f- 


J L | 8,=A (XYZ) 

(USING (XYZ,8 

(MVC (PDQ (16) ,=4C*ABCD' 


| XYZ 
| PDQ 


(COM 

|DS 

IDS 


16F 

16C 


l-X_X-J 


No instructions or constants appearing 
in a common control section are assembled. 
Data can only be placed in a common control 
section through execution of the program. 

If the assignment of common storage is 
done in the same manner by each independent 
assembly, reference to a location in the 
common area by any assembly results in the 
same location being referenced. When the 
blank common control section is assembled 
the initial value of the location counter 
is set to zero. 


SYMBOLIC LINKAGES 


Symbols may be defined in one module and 
referred to in another, thus effecting 
symbolic linkages between independently 


assembled program sections. The linkages 
can be effected only if the assembler is 
able to provide information about the 
linkage symbols to the linkage editor, 
which resolves these linkage references. 

The assembler places the necessary 
information in the external symbol 
dictionary on the basis of the linkage 
symbols identified by, e.g., the ENTRY and 
EXTRN instructions. Note that these 
symbolic linkages are described as linkages 
between independent modules; more 
specifically, they are linkages between 
independently assembled control sections. 



In the module where the linkage symbol 
is defined (i.e., used as a name), it must 
also be identified to the linkage editor 
and assembler by means of the ENTRY 
assembler instruction (unless the symbol is 
the name of a CSECT or START statement). 

It is identified as a symbol that names an 
entry point, which means that another 
module may use that symbol in order to 
effect a branch operation or a data 
reference. The assembler places this 
information in the external symbol 
dictionary. 


Similarly, the module that uses a symbol 
defined in some other module must identify 
it by the EXTRN or WXTRN assembler 
instruction. Since the definition of the 
symbol appears in another module, the 
assembler arbitrarily assigns a length 
attribute of 1 and a value of 0. The 
assembler places this information in the 
external symbol dictionary. 


V> ! 


Another way to obtain symbolic linkages 
is by using the V-type address constant. 

The subsection "Data Definition 
Instructions" in Section 5 contains the 
details pertinent to writing a V-type 
address constant. It is sufficient here to 
note that this constant may be considered 
an indirect linkage point. It is created 
from an externally defined symbol, but that 
symbol does not have to be identified by an 
EXTRN or WXTRN statement. The V-type 
address constant is intended to be used 
for external branch references (i.e., for 
effecting branches to other programs). 
Therefore, it should not be used for 
external data references (i.e., for 
referring to data in other modules). 


ENTRY—Identify Entry Point Symbol 


The ENTRY instruction identifies linkage 
symbols that are defined in the module 
where the ENTRY instruction appears. These 
symbols can be referred to in other 
modules. 
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r -If- T - 

|Name |Operation(Operand 

|.-+-+- 

(Sequence (ENTRY |One or more reloca- 
(symbol orj (table symbols, 

jnot used | (separated by 

j j (commas, that also 

I j |appear as state- 

| j jment names 

L-X- X _ 

A source module may contain a maximum of 
100 ENTRY symbols. ENTRY- symbols which are 
not defined (not appearing as statement 
names) , although invalid, will also count 
towards this maximum. 

An ENTRY statement operand may not 
contain a symbol defined in a dummy section 
or in a blank common control section. An 
ENTRY statement containing a symbol defined 
in an unnamed control section can be 
processed by the assembler, but the DOS/TOS 
Linkage Editor will not process the 
resulting deck. The following example 
identifies the statements named SINE and 
COSINE as entry points to the program. 

r- t-t-1 

(Name (Operation|Operand J 

t - + -- + -^ 

J (ENTRY |SINE,COSINE j 

l-X-X-J 


1 r-T-T-n 

| J Name (Operation(Operand J 

* I--+-+-4 

j j EXTRN j RATEBL,PAYCALC j 

j jEXTRN (WITHCALC ( 

L-X-L_ J 

An example that employs the EXTRN 
instruction appears subsequently under 
"Addressing External Control Sections." 

Note 1 : A V-type address constant does not 
havfe to be identified by an EXTRN 
statement. 

Note 2 : Only one external symbol may be 
used in an expression. 


Addressing External Control Sections 


A common way for a program to link to an 
external control section is to: 

1. Create a V-type address constant with 
the name of the external symbol. 

2. Load the constant into a general 
register and branch to the control 
section via the register. 


Note : Labels of START and CSECT statements 
are automatically treated as entry points 
to a module. Thus they need not be 
identified by ENTRY statements. 


EXTRN—Identify External Symbol 


The EXTRN instruction identifies linkage 
symbols used by one source module but 
identified in another module. Each 
external symbol must be identified. This 
includes symbols that refer to control 
section names. The format of the EXTRN 
statement is: 

T-T-T-1 

|Name (Operation(Operand | 

I--+-+-1 

|Sequence (EXTRN |One or more relocata-( 

jsymbol orj jble symbols, separ- j 

jnot used j jated by commas. j 

i_,_x_x_j 


r- 

(Name 

L 

(Operation(Operand 

.X X 

! MAINPROGjCSECT 

T 

1 

|BEGIN 

| BALR 

( 2,0 


(USING 

I* 

| * r 2 
( 


1 • 

|L 

1 

| 3 ,VCON 


| BALR 

(• 

( 1,3 

l 

(VCON 

!• 

j DC 

1 

jv (SINE) 


jEND 

jBEGIN 


l-X-X-J 

The combined number of control sections 
and dummy sections plus the number of 
unique symbols in EXTRN or WXTRN statements 
and V-type address constants may not exceed 
255. (EXTRN and WXTRN statements are 
discussed in this section; V-type constants 
in Section 5 under "DC—Define Constant.") 
If the same symbol appears in a V-type 
address constant and in the name entry of a 
CSECT or DSECT statement, it is counted as 
two symbols. 


The symbols in the operand field may not 
appear as names of statements in the 
module. The following example identifies 
three external symbols that have been used 
as operands in the module but are 
identified in some other module. 


For example, to link to the control 
section named SINE, the preceding coding 
might be used. 

An'external symbol naming data may be 
referred to as follows: 
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1 . 


Identify the external symbol with the WXTRN—Identify Weak External Symbol 

EXTRN instruction, and create an ~ 

address constant from the symbol. 

(DOS Assembler 14K D only) 


2. Load the constant into a general 
register, and use the register for 
base addressing. 


For example, to use an area named 
RATETBL, which is in another control 
section, the following coding might be 
used: 


Name |Operation!Operand 

_L X 

MAINPROG|CSECT 

T 

1 

BEGIN (BALR 

1 2,0 

{USING 

I* 

1**2 

1 

1 * 

j EXTRN 

I* 

1 

J RATETBL 

1 

I* 

|L 

1 

j 4,RATEADDR 

|USING 

{RATETBL,4 

|A 

1 • 

j 3,RATETBL 

1 

I* 

RATEADDR{DC 

1 

| A (RATETBL) 

{END 

(BEGIN 

_ X- 

X- - 


The WXTRN statement has the same format and 
almost the same use as the EXTRN statement. 
The only difference is that WXTRN 
suppresses the AUTOLINK function of the 
linkage editor for the symbols identified 
by it. Its format is: 


r- T - T -n 

{Name |Operation|Operand | 


| {Sequence (WXTRN |One or more relocat- | 
•j {symbol orj jable symbols, separ- j 
{ (not used | jated by commas. J 

I L -JL -Jl-J 


The AUTOLINK (automatic library look-up) 
function searches the relocatable library 
for any unresolved external references. If 
it finds the external reference, it 
includes the module where the reference 
appears in the phase produced by the 
linkage editor. Any address constant 
containing an unresolved weak external 
symbol will appear (at program execution 
time) as though the value of the symbol was 
resolved to zero. 


/ For more detailed information on 
aUTOLINK refer to DOS System Control and 
Service. 


Note : AUTOLINK will be suppressed for a 

symbol defined both in a V-type address 
constant and in a WXTRN statement. 
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Section 4. Machine Instructions 




This section discusses the coding of the 
machine instructions represented in the 
assembler language. The reader is reminded 
that the functions of each machine 
instruction are discussed in the 
"Principles of Operation" manual (see 
"Preface") . 


Machine Instruction Statements 


Machine instructions may be represented 
symbolically as assembler language 
statements. The symbolic format of each 
varies according to the actual machine 
instruction format, of which there are 
five: RR, RX, RS, SI, and SS. Within each 
basic format, further variations are 
possible. 

The symbolic format of a machine 
instruction is similar to, but does not 
duplicate, its actual format. Appendix C 
illustrates machine format for the five 
classes of instructions. A mnemonic 
operation code is written in the operation 
field, and one or more operands are written 
in the operand field. Comments may be 
appended to a machine instruction statement 
as previously explained in Section 1. 

Any machine instruction statement may be 
named by a symbol, which other assembler 
statements can use as an operand. The 
value attribute of the symbol is the 
address of the leftmost byte assigned to 
the assembled instruction. The length 
attribute of the symbol depends on the 
basic instruction format, as follows: 

Basic Format Length Attribute 


RR 2 

RX 4 

RS 4 

SI 4 

SS 6 


INSTRUCTION ALIGNMENT AND CHECKING 


All machine instructions are aligned 
automatically by the assembler on halfword 
boundaries. If any statement that causes 
information to be assembled requires 
alignment, the bytes skipped are filled 
with hexadecimal zeros. All expressions 
that specify storage addresses are checked 
to insure that they refer to appropriate 


boundaries for the instructions in which 
they are used. Register numbers are also 
checked to make sure that they specify the 
proper registers, as follows: 

1. Floating-point instructions must 
specify floating-point registers 0, 2, 
4, or 6. 

2. Double-shift, fullword multiply, and 
divide instructions must specify an 
even-numbered general register in the 
first operand. 

3. Extended precision floating-point 
instructions must specify floating 
point register 0 or 4. 


OPERAND FIELDS AND SUBFIELDS 


Some symbolic operands are written as a 
single field and other operands are written 
as a field followed by one or two 
subfields. For example, addresses consist 
of the contents of a base register and a 
displacement. An operand that specifies a 
base and displacement is written as a 
displacement field followed by a base 
register subfield, as follows: 40(5). In 
the RX format, both an index register 
subfield and a base register subfield are 
written as follows: 40(3,5). In the SS 
format, both a length subfield and a base 
register subfield are written as follows: 

40 (21,5) . 

Appendix C shows two types of addressing 
formats for RX, RS, SI, and SS 
instructions. In each case, the first type 
shows the method of specifying an address 
explicitly, as a base register and 
displacement. The second type indicates 
how to specify an implied address as an 
expression. 

For example, a load multiple instruction 
(RS format) may have either of the 
following symbolic operands: 

R1,R3,D2 (B2) —explicit address 
R1,R3,S2—implied address 

Whereas D2 and B2 must be represented by 
absolute expressions, S2 may be represented 
either by a relocatable or an absolute 
expression. 

In order to use implied addresses, the 
following rules must be observed: 
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1 . 


The base register assembler 
instructions (USING and DROP) must be 
used. 

2. An explicit base register designation 
must not accompany the implied 
address. 

For example, assume that FIELD is a 
relocatable symbol, which has been assigned 
a value of 7400. Assume also that the 
assembler has been notified (by a USING 
instruction) that general register 12 
currently contains a relocatable value of 
4096 and is available as a base register. 
The following example shows a machine 
instruction statement as it would be 
written in assembler language and as it 
would be assembled. Note that the value of 
D2 is the difference between 7400 and 4096 
and that X2 is assembled as zero, since it 
was omitted. The assembled instruction is 
presented in hexadecimal: 

Assembler statement: 

ST 4, FI ELD 

Assembled instruction: 

Op. Code Rl X2 62 D2 

50 4 0 C CE8 

An address may be specified explicitly 
as a base register and displacement (and 
index register for RX instructions) by the 
formats shown in the first column of Figure 
5. The address may be specified as an 
implied address by the formats shown in the 
second column. Observe that the two 
storage addresses required by the SS 
instructions are presented separately; an 
implied address may be used for one while 
an explicit address is used for the other. 


r-- 

jType 

j _ 

- T --- 

(Explicit 

AddressjImplied Address 

IrX 

j .-. 

JD2 (X2,B2) 

- . . _ | 

j S2 (X2) 

1 

|D2 (,B2) 

| S2 

j RS 

|D2 (B2) 

| S2 

|SI 

J D1 (B 1) 

1 si 

jss 

1D 1 (L1,B1) 

| SI (LI) 

1 

ID1 (L ,B 1) 

1 SI (L) 

1 

L _ 

|D2 (L2,B2) 

_ J. _ _ _ 

j S2 (L2) 

L _ 


Figure 5. Details of Address Specification 


A comma must be written to separate 
operands. Parentheses must be written to 
enclose a subfield or subfields, and a 
comma must be written to separate two 
subfields within parentheses. When 
parentheses are used to enclose one 
subfield, and the subfield is omitted, the 
parentheses must be omitted. In the case 


of two subfields that are separated by a 
comma and enclosed by parentheses, the 
following rules apply: 

1. If both subfields are omitted, the 
separating comma and the parentheses 
must also be omitted. 

L 2,48(4,5) 

L 2,FIELD (implied address) 

2. If the first subfield in the sequence 
is omitted, the comma that separates 
it from the second subfield is 
written. The parentheses must also be 
written. 

MVC 32 (16,5) ,FIELD2 

MVC 32 (,5) ,FIELD2 (implied length) 

3. If the second subfield in the sequence 
is omitted, the comma that separates 
it from the first subfield must be 
omitted. The parentheses must be 
written. 

MVC 32 (16,5) ,FIELD2 
MVC FIELD1(16) ,FIELD2 
(implied address) 

Fields and subfields in a symbolic 
operand may be represented either by 
absolute or by relocatable expressions, 
depending on what the field requires. (An 
expression has been defined as consisting 
of one term or a series of arithmetically 
combined terms.) Refer to Appendix C for a 
detailed description of field requirements. 

Note : Blanks may not appear in an operand 

unless provided by a character 
self-defining term or a character literal. 
Thus, blanks may not intervene between 
fields and the comma separators, between 
parentheses and fields, etc. 


LENGTHS—EXPLICIT AND IMPLIED 


The length field in SS instructions can 
be explicit or implied. To imply a lengtn, 
the programmer omits a length field from 
the operand. The omission indicates that 
the length field is either of the 
following: 

1. The length attribute of the expression 
specifying the displacement, if an 
explicit base and displacement have 
been written. 

2. The length attribute of the expression 
specifying the effective address, if 
the base and displacement have been 
implied. 



n 
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In either case, the length attribute for 
an expression is the length of the leftmost 
term in the expression. The length 
attribute of asterisk (*) is equal to the 
length of the instruction in which it 
appears, except that in an EQU to * 
statement, the length attribute is 1. 

By contrast, an explicit length is 
written by the programmer in the operand as 
an absolute expression. The explicit 
length overrides any implied length. 

Whether the length is explicit or 
implied, it is always an effective length. 
The value inserted into the length field of 
the assembled instruction is one less than 
the effective length in the machine 
instruction statement. 

Note : If a length field of zero is 

desired, the length may be stated as zero 
or one. 

To summarize, the length required in an 
SS instruction may be specified explicitly 
by the formats shown in the first column of 
Figure 6 or may be implied by the formats 
shown in the second column. Observe that 
the two lengths required in one of the SS 
instruction formats are presented 
separately. An implied length may be used 
for one while an explicit length is used 


for the other. 

r 

jExplicit Length 

j __ _ . 

r i 

Implied Length | 

j 

i D1 (LI ,B 1) 

|S1 (LI) 

|D1 (L,B1> 

|S1 (L) 

|D2 (L2,B2) 

|S2(L2) 

L___ 

D1(,B1) J 

SI j 

D1(,B1) | 

51 | 

D2(,B2) j 

52 | 

L__ __ _ _J 


Figure 6. Details of Length Specification 
in SS Instructions 


Machine Instruction Mnemonic Codes 


represents Move. The function may be 
further defined by a modifier. For 
example, the modifier L indicates a logical 
function, as in AL for Add Logical and MV 
is modified by C (MVC) to indicate Move 
Characters. 

Mnemonic codes for functions involving 
data usually indicate the data types, by 
letters that correspond to those for the 
data types in the DC assembler instruction 
(see Section 5) . Furthermore, letters U, 

W, and X have been added to indicate short 
unnormalized, long unnormalized, and 
extended floating point operations, 
respectively. For example, AE indicates 
Add Normalized Short, whereas AU indicates 
Add Unnormalized Short. Where applicable, 
fullword fixed-point data is implied if the 
data type is omitted. 

The letters R and I are added to the 
codes to indicate, respectively, RR and SI 
machine instruction formats. Thus, AER 
indicates Add Normalized Short in the RR 
format. Functions involving character and 
decimal data types imply the SS format. 


MACHINE INSTRUCTION EXAMPLES 


The examples that follow are grouped 
according to machine instruction format. 
They illustrate the various symbolic 
operand formats. All symbols employed in 
the examples must be assumed to be defined 
elsewhere in the same assembly. All 
symbols that specify register numbers and 
lengths must be assumed to be equated 
elsewhere to absolute values. 

Implied addressing, control section 
addressing, and the function of the USING 
assembler instruction are not considered 
here. For discussion of these 
considerations and for examples of coding 
sequences that illustrate them, refer to 
"Program Sectioning and Linking", and "Base 
Register Instructions" in Section 3. 


The mnemonic operation codes (shown in 
Appendix D) are designed to be easily 
remembered codes that indicate the 
functions of the instructions. The normal 
format of the code is shown below; the 
items in brackets are not necessarily 
present in ail codes: 

Verb (Modifier] [Data Type] [Machine Format] 


The verb, which is usually one or two 
characters, specifies the function. For 
example, A represents Add, and MV 


RR Format 


j Name 

f- 

jALPHA1 
j ALPHA2 
I BETA 
jGAMMA1 
JGAMMA2 


j Operation j Operand 

4 - 4 - 

|LR j1,2 

|LR |REG1,REG2 

j SPM j 15 

JSVC |250 

|SVC ITEN 



I 

H 
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The operands of ALPHA1, BETA, and GAMMA1 
are decimal self-defining values, which are 
categorized as absolute expressions. The 
operands of ALPHA2 and GAMMA2 are symbols 
that are equated elsewhere to absolute 
values. 


RX Format 


r-- — 

-T- 


-1 

|Name 

j 

|Operation!Operand 

i i 

1 

i 

| ALPHA1 

i 

|L 

I 1,39 (4,10) 

I 

1 

jALPHA2 

|L 

j REG 1,39 (4,TEN) 

1 

j BETA1 

|L 

j 2 , ZETA (4) 

1 

j BETA2 

|L 

| REG2 , ZETA (REG 4) 

1 

jGAMMA1 

IL 

j 2,ZETA 

1 

JGAMMA2 

|L 

j REG2,ZETA 

1 

| GAMMA3 

II* 

|2,=F' 1000' 

1 

jLAMBDA1 

(L 

13,20 (,5) 

1 

l___ 


-j.--- 

__ _j 

Both 

ALPHA 

instructions specify 

explicit 


SI Fermat 

r- t-t-1 


(Name 

(Operation j Operand 
j. 

j- 

jALPHA1 

| CL I 

(40 (9) ,X* 40' 

j ALPHA2 

| CL I 

(40 (REG9) ,TEN 

JEETA1 

j CLI 

j ZETA,TEN 

j BETA2 

JCLI 

jZETA,C'A* 

j GAMMA 1 

(SIO 

(40(9) 

(GAMMA2 

|SIC 

|0 (9) 

(GAMMA3 

(SIO 

(40(0) 

(GAMMA4 

(SIO 

(ZETA 


L-L-J.---J 

The ALPHA instructions and GAMMA1-GAMMA3 
specify explicit addresses, whereas the 
EETA instructions and GAMMA4 specify 
implied addresses. GAMMA2 specifies a 
displacement of zero. GAMMA3 does not 
specify a base register. 


SS Format 


addresses; REG1 and TEN are absolute 
symbols. Both BETA instructions specify 
implied addresses, and both use index 
registers. Indexing is omitted from the 
GAMMA instructions. GAMMA 1 and GAMMA2 
specify implied addresses. The second 
operand of GAMMA3 is a literal. LAMBDA1 
specifies no indexing. 


RS Format 


(Name 

f- 

jALPHA1 
jALPHA2 
jALPHA3 
(ALPHA4 
jALPHAS 

L_ 


j Operation!Operand 

4 - f - 

|BXH j 1,2,20 (14) 

jBXH j REG 1,REG2,20 (REGD) 

jBXH j REG 1,REG2,ZETA 

|SLL |REG 2,15 

jSLL J REG2,0 (15) 

-1 - L - 


r -7- 7 -1 

{Name (Operation|Operand | 

I--4-4-1 


r — 

(ALPHA1 

T -- 

j AP 

(40 (9,8) ,30 (6,7) 

“1 

| ALPHA2 

(AP 

(40 (NINE,REG8) ,30 (L6,7) 


(ALPHA3 

(AP 

JFTELD2,FIELD 1 


(ALPHA4 

(AP 

(FIELD2 (9) ,FIELD 1 (6) 


(BETA 

(AP 

(FIELD2 (9) ,FIELD 1 


jGAMMA1 

(MVC 

(40 (9,8) ,30 (7) 


| GAMMA2 

(MVC 

j 40 (NINE,REG8) ,DEC (7) 


jGAMMA3 

(MVC 

(FIELD2,FIELD 1 


(GAMMA4 

L __- 

(MVC 

.j- 

JFIELD2 (9) ,FIELD 1 
_ — 1 — --- 

_j 


ALPHA 1, ALPHA2, GAMMA1, and GAMMA2 
specify explicit lengths and addresses. 
ALPHA3 and GAMMA3 specify both implied 
length and implied addresses. ALPHA4 and 
GAMMA4 specify explicit length and implied 
addresses. BETA specifies an explicit 
length for FIELD2 and an implied length for 
FIELD1; both addresses are implied. 


Whereas ALPHA1 and ALPHA2 specify 
explicit addresses, ALPHA3 specifies an 
implied address. ALPHA4 is a shift 
instruction shifting the contents of REG2 
left 15 bit positions. ALPHA5 is a shift 
instruction shifting the contents of REG2 
left by the value contained in general 
register 15. 


Extended Mnemonic Codes 


For the convenience of the programmer, the 
assembler provides extended mnemonic codes, 
which allow conditional branches to be 
specified mnemonically as well as through 
the use of the BC machine instruction. 

These extended mnemonic codes specify both 
the machine branch instruction and the 
condition on which the branch is to occur. 
The codes are not part of the universal set 
of machine instructions, but are translated 
by the assembler into the corresponding 
operation and condition combinations. 
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Extended Code 

Meaning 

Machine Instruction 

B 

D2 (X2,B2) 

Branch 

Unconditional 

BC 

15 , D2 (X2 , B2) 

BR 

R2 

Branch 

Unconditional (RR format) 

BCR 15,R2 

NOP 

D2 (X2,B2) 

No Operation 

BC 

0 ,D2 (X2,B2) 

NOPR 

R2 

No Operation (RR format) 

BCR 0,R2 


Used After Compare Instructions 



BH 

D2 (X2,B2) 

Branch 

on High 

BC 

2,D2 (X2,B2) 

bl 

D2 (X2,B2) 

Branch 

on Low 

BC 

4 ,D2 (X2,B2) 

BE 

D2 (X2,B2) 

Branch 

on Equal 

BC 

8 ,D2 (X2,B2) 

BNH 

D2 (X2,B2) 

Branch 

on Not High 

BC 

13,D2 (X2,B2) 

BNL 

D2 (X2,B2) 

Branch 

on Not Low 

BC 

11,D2(X2,B2) 

BNE 

D2 (X2,B2) 

Branch 

on Not Equal 

BC 

7 ,D2 (X2,B2) 


Used After 

Arithmetic 

Instructions 



BO 

D2 (X2,B2) 

Branch 

on Overflow 

BC 

1 ,D2 (X2,B2) 

BP 

D2 (X2,B2) 

Branch 

on Plus 

BC 

2 ,D2 (X2,B2) 

BM 

D2 (X2,B2) 

Branch 

on Minus 

BC 

4 ,D2 (X2,B2) 

BZ 

D2 (X2,B2) 

Branch 

on Zero 

BC 

8 ,D2 (X2,B2) 

BNP 

D2 (X2,B2) 

Branch 

on Not Plus 

BC 

13,D2 (X2,B2) 

BNM 

D2 (X2,B2) 

Branch 

on Not Minus 

BC 

11, D2 (X2 , B2) 

BNZ 

D2 (X2,B2) 

Branch 

on Not Zero 

BC 

7 ,D2 (X2,B2) 


Used After 

Test Under 

Mask Instructions 



BO 

D2 (X2,B2) 

Branch 

if Ones 

BC 

1 ,D2 (X2,B2) 

BM 

D2 (X2,B2) 

Branch 

if Mixed 

BC 

4 ,D2 (X2,B2) 

BZ 

D2 (X2,B2) 

Branch 

if Zeros 

BC 

8 ,D2 (X2,B2) 

BNO 

D2 (X2,B2) 

Branch 

if Not Ones 

BC 

14 , D2 (X2 , E2) 


L_I 

Figure 7. Extended Mnemonic Codes 


The allowable extended mnemonic codes 
and their operand formats are shown in 
Figure 7, together with their machine 
instruction equivalents. Unless otherwise 
noted, all extended mnemonics shown are for 
instructions in the RX format. Note that 
the only difference between the operand 
fields of the extended mnemonics and those 
of their machine instruction equivalents is 
the absence of the R1 field and the comma 
that separates it from the rest of the 
operand field. The extended mnemonic list, 
like the machine instruction list, shows 
explicit address formats only. Each 
address can also be specified as an implied 
address. 


In the following examples, which 
illustrate the use of extended mnemonics, 
it is to be assumed that the symbol GO is 
defined elsewhere in the program. 


r- t-t- 1 

(Name (Operation!Operand | 

j.-[--j-1 

I | B 140 (3,6) | 

I IB |40(,6) | 

I |BL |G0 (3) | 

| |BL j GO j 

j j BR j 4 j 

j (NOP j GO (3) j 

l_L_JL_I 


The first two instructions specify an 
unconditional branch to an explicit 
address. The address in the first case is 
the sum of the contents of base register 6, 
the contents of index register 3, and the 
displacement 40; the address in the second 
instruction is not indexed. The third 
instruction specifies a branch on low to 
the address implied by GO as indexed by the 
contents of index register 3; the fourth 
instruction does not specify an index 
register. The next instruction is an 
unconditional branch to the address 
contained in register 4. The last 
instruction is a "no operation". It will 
not branch under any condition because the 
mask field is zero. 
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Section 5. Assembler Instruction Statements 


O 


Just as machine instructions are used to 
request the computer to perform a sequence 
of operations during program execution 
time, so assembler instructions are 
requests to the assembler to perform 
certain operations during the assembly. 
Assembler instruction statements, in 
contrast to machine instruction statements, 
do not always cause machine instructions to 
be included in the assembled program. 

Some, such as DS and DC, generate no 
instructions but do cause storage areas to 
be set aside for constants and other data. 
Others, such as EQU and SPACE, are 
effective only at assembly time; they 
generate nothing in the assembled program 
and have no effect on the location counter. 

The following is a list of all the 
assembler instructions. 

Symbol Definition Instruction 
EQU Equate Symbol 

Data Definition Instructions 
DC Define Constant 

DS Define Storage 

CCW Define Channel Command Word 

Program Sectioning and Linking Instructions 1 
START Start Assembly 
CSECT Identify Control Section 

DSECT Identify Dummy Section 

ENTRY Identify Entry-Point Symbol 

EXTRN Identify External Symbol 

WXTRN Identify Weak External Symbol 

COM Identify Blank Common Control 

Section 

Base Register Instructions 1 
USING Use Base Address Register 
DROP Drop Ease Address Register 


Symbol Definition Instruction 


EQU—EQUATE SYMBOL 


The EQU instruction is used to define a 
symbol by assigning to it the length, 
value, and relocatability attributes of an 
expression in the operand field. The 
typical form of the EQU instruction 
statement is as follows: 


f - T - T -1 

jName (Operation|Operand | 


I-- 

-4- 

—4- 

-H 

|A variable 

(EQU 

|An expression 

1 

(symbol or 

1 

1 

1 

(an ordinary 

1 

1 

1 

(symbol 

i__ 

1 

~l- 

1 

1 

_j 


The expression in the operand field may 
be absolute or relocatable. Any symbols 
appearing in the expression must be 
previously defined. 

The symbol in the name field is given 
the same attributes as the expression in 
the operand field. The length attribute of 
the symbol is that of the leftmost (or 
only) term of the expression. When that 
term is * or a self-defining term, the 
length attribute is 1. The value attribute 
of the symbol is the value of the 
expression. 

The EQU instruction is the means of 
equating symbols to register numbers, 
immediate data, and other arbitrary values. 
The following examples illustrate how this 
might be done: 


Listing Control Instructions 
TITLE Identify Assembly Output 
EJECT Start New Page 

SPACE Space Listing 

PRINT Print Optional Data 

Program Control Instructions 

ICTL~ Input Format Control 

ISEQ Input Sequence Checking 

ORG Set Location Counter 

LTORG Eegin Literal Pool 

CNOP Conditional No Operation 

COPY Copy Predefined Source Coding 

END End Assembly 

PUNCH Punch a Card 

REPRO Reproduce Following Card 


Discussed in Section 3. 


r - T - T -, 

J Name |Ope ration J Operand | 

f-4--4-1 

|REG2 j EQU j 2 (general register) | 

(TEST j EQU jx^F* (immediate data) j 

i-—i- x -, J 


To reduce programming time, the 
programmer can equate symbols to frequently 
used expressions and then use the symbols 
as operands in place of the expressions. 
Thus, in the statement FIELD is 


I-7-T-~-1 

(Name (Operation(Operand | 

I--4-4---^ 

III I 

(FIELD (EQU (ALFHA-BETA+GAMMA j 

L_L_-_J_,_J 
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defined as ALPHA-BETA+GAMMA and may be used 
in place of it. Note, however, that ALPHA, 
BETA, and GAMMA must all be previously 
defined. If the final result of the 
expression is negative, the low order 24 
bits of the 2*s complement is used. 


Data Definition Instructions 


There are three data definition instruction 
statements: Define Constant (DC) , Define 

Storage (DS), and Define Channel Command 
Word (CCW) . 

These statements are used to enter data 
constants into storage, to define and 
reserve areas of storage, and to specify 
the contents of channel command words. The 
statements may be named by symbols so that 
other program statements can refer to the 
fields generated from them. The discussion 
of the DC instruction is far more extensive 
than that of the DS instruction, because 
the DS instruction is written in the same 
format as the DC instruction and may 
specify some or all of the information that 
the DC instruction provides. Only the 
function and treatment of the statements 
vary. For this reason, the DC instruction 
is presented first and discussed in more 
detail than the DS instruction. 


DC—DEFINE CONSTANT 


The DC instruction is used to provide 
constant data in storage. It may specify 
one constant or a series of constants, 
thereby relieving the programmer of the 
necessity to write a separate data 
definition statement for each constant 
desired. Furthermore, a variety of 
constants may be specified: fixed-point, 
floating-point, decimal, hexadecimal, 
character, and storage addresses. (Data 
constants are generally called constants 
unless they are created from storage 
addresses, in which case they are called 
address constants.) The typical form of 
the DC instruction statement is as follows: 


Each operand consists of four subfields; 
the first three describe the constant, and 
the fourth subfield provides the constant 
or constants. The first and third 
subfields may be omitted, but the second 
and fourth must be specified. Note that 
more than one constant may be specified in 
the fourth subfield for most types of 
constants. Each constant so specified must 
be of the same type; the descriptive 
subfields that precede the constants apply 
to all of them. No blanks may occur within 
any of the subfields (unless provided as 
characters in a character constant or a 
character self-defining term), nor may they 
occur between the subfields of an operand. 
Similarly, blanks may not occur between 
operands and the commas that separate them 
when multiple operands are being specified. 


The subfields of the DC operand are 
written in the following sequence: 


j Subfield 

| 1 2 3 4 

|.-7-7-7- 

|Dupli- |Type{Modifiers|Constant (s) 
jcation j j | 

(Factor j | j 

i_ i _ i _j.- 


I 

i 


j 


The symbol that names the DC instruction 
is the name of the constant (or first 
constant if the instruction specifies more 
than one) . Relative addressing (e.g., 
SYMBOL+2) may be used to address the 
various constants if more than one has been 
specified, because the number of bytes 
allocated to each constant can be 
determined. 


The value attribute of the symbol naming 
the DC instruction is the address of the 
leftmost byte (after any necessary 
alignment) of the first, or only, constant. 
The length attribute depends on two things: 
the type of constant being defined and the 
presence of a length specification. 

Implied lengths are assumed for the various 
constant types in the absence of a length 
specification. If more than one constant 
is defined, the length attribute is the 
length in bytes (specified or implied) of 
the first constant. 


jName jOperationjOperand j 

y -f-f-* 

{Any symbol {DC |One operand (D as-| 

j or not used j j sembler) or one or j 

] j |more operands (F j 

j { {assembler) in the j 

J j (format described j 

{ j {below, each separ-J 

| j jated by a comma. j 

i-j_i_j 


Boundary alignment also varies according 
to the type of constant being specified and 
the presence of a length specification. 

Some constant types are only aligned to a 
byte boundary, but the DS instruction can 
be used to force any type of word boundary 
alignment for them. This is explained 
under "DS—Define Storage." Other 
constants are aligned at various word 
boundaries (half, full, or double) in the 
absence of a length specification. If 
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length is specified, no boundary alignment 
occurs for such constants. 

Bytes that must be skipped in order to 
align the field at the proper boundary are 
not considered to be part of the constant. 
In other words, the location counter is 
incremented to reflect the proper boundary 
(if any incrementing is necessary) before 
the address value is established. Thus, 
the symbol naming the constant will not 
receive a value attribute that is the 
location of a skipped byte. 

Any bytes skipped in aligning statements 
that do not cause information to be 
assembled are not zeroed. Thus bytes 
skipped to align a DC statement are zeroed, 
and bytes skipped to align a DS statement 
are not zeroed. 

Appendix F summarizes, in chart form, 
the information concerning constants that 
is presented in this section. 

LITERAL DEFINITIONS : The reader is 
reminded that the discussion of literals as 
machine instruction operands (in Section 2) 
referred him to the description of the DC 
operand for the method of writing a literal 
operand. All subsequent operand 
specifications are applicable to writing 
literals, the only differences being: 

1. The literal is preceded by an = sign. 

2. Unsigned decimal values must be used 
to express the duplication factor and 
length modifier values. 

3. The duplication factor may not be 
zero. 

4. S-type address constants may not be 
specified. 

5. Signed or unsigned decimal values must 
be used for exponent and scale 
modifier values. 

Examples of literals appear throughout 
the balance of the DC instruction 
discussion. 


Operand Subfield 1: Duplication Factor 


The duplication factor may be omitted. If 
specified, it causes the constant (s) to oe 
generated the number of times indicated by 
the factor. The factor may be specified 
either by an unsigned decimal self-defining 
term or by a positive absolute expression 
that is enclosed by parentheses. The 
duplication factor is applied after the 
constant is assembled. All symbols in the 
expression must be previously defined. 


Note that a duplication factor of zero 
is permitted except in a literal and 
achieves the same result as it would in a 
DS instruction. A DC instruction with a 
zero duplication factor will not produce 
control dictionary entries. See "Forcing 
Alignment" under "DS—Define Storage." 

Note : If duplication is specified for an 

address constant containing a location 
counter reference, the value of the 
location counter used in each duplication 
is incremented by the length of the 
operand. 


Operand Subfield 2: Type 


The type subfield defines the type of 
constant being specified. From the type 
specification, the assembler determines how 
it is to interpret the constant and 
translate it into the appropriate machine 
format. The type is specified by a single 
letter code as shown in Figure 8. 

Further information about these 
constants is provided in the discussion of 
the constants themselves under "Operand 
Subfield 4: Constant." 


Operand Subfield 3: Modifiers 


Modifiers describe the length in bytes 
desired for a constant (in contrast to an 
implied length) , and the scaling and 
exponent for the constant. If multiple 
modifiers are written, they must appear in 
this sequence: length, scale, exponent. 
Each is written and used as described in 
the following text. 


LENGTH MODIFIER : This is written as Ln, 
where n is either an unsigned decimal 
self-defining term or a positive absolute 
expression enclosed by parentheses. Any 
symbols in the expression must be 
previously defined. The value of n 
represents the number of bytes of storage 
that are assembled for the constant. The 
maximuM value permitted for the length 
modifiers supplied for the various types of 
constants is summarized in Appendix F. 

This table also indicates the implied 
length for each type of constant; the 
implied length is used unless a length 
modifier is present. A length modifier may 
be specified for any type of constant. 
However, no boundary alignment will be 
provided when a length modifier is given. 
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Code Type of Constant Machine Format 


Character 

Hexadecimal 

Binary 

Fixed-point 

Fixed-point 

Floating-point 

Floating-point 

Floating-point 

Decimal 

Decimal 

Address 

Address 

Address 

Address 


8-bit code for each character 
4-bit code for each hexadecimal digit 
Binary format 

Signed, fixed-point binary format; normally a fullword 
Signed, fixed-point binary format; normally a halfword 
Short floating-point format; normally a fullword 
Long floating-point format; normally a doubleword 
Extended floating-point format; normally two double words 
(DOS Assembler D 14K variant only) 

Packed decimal format 
Zoned decimal format 

Value of address; normally a fullword 

Value of address; normally a halfword 

Base register and displacement value; a halfword 

Space reserved for external symbol addresses; each address 

normally a fullword 


Figure 8. Type Codes for Constants 


Bit-Length Specification (F assembler 
only) : The length of a constant, in bits, 
is specified by L.n, where n is specified 
as stated above and represents the number 
of bits in storage into which the constant 
is to be assembled. The value of n may 
exceed eight and is interpreted to mean an 
integral number of bytes plus so many bits. 
For example, L.20 is interpreted as a 
length of two bytes plus four bits. 


byte 

I 
I 

| 000100101000 11,000 1 
579 fill 

Figure 9. Bit-Length Specification (Single 
Constant) 


In storage: 
byte byte 

I 


paddingj 


Assembly of the first or only constant 
with bit-length specification starts on a 
byte boundary. The constant is placed in 
the high- or low-order end of the field 
depending on the type of constant being 
specified. The constant is padded or 
truncated to fit the field. If the 
assembled length does not leave the 
location counter set at a byte boundary, 
and another bit length constant does not 
immediately follow in the same statement, 
the remainder of the last byte used is 
filled with zeros. This leaves the 
location counter set at the next byte 
boundary. Figure 9 shows a fixed-point 
constant with a specified bit-length of 13, 
as coded, and as it would appear in 
storage. Note that the constant has been 
padded on the left to bring it to its 
designated 13-bit length. 


As coded: 


The implied length of BLCON is two 
bytes. A reference to ELCCN would cause 
the entire two bytes to be referenced. 


When bit-length specification is used in 
association with multiple constants (see 
"Operand Subfield 4: Constant" following), 
each succeeding constant in the list is 
assembled starting at the next available 
bit. Figure 10 illustrates this. 


As coded: 


r -- T - 

(Name (Operation|Operand 

i-- i -*- 

| ELMCON |DC |FL.10*161,21,57 


i 

I 

H 

I 

j 


r - T - jj- 

(Name |Operation]Operand 

f- + -f- 

j BLCON j DC |FL.13'579 

i- x. -i.- 


t 

I 

A 

I 

j 
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In storage: 


byte byte byte byte byte 

I I I I I 

| J padding] padding ] 

I I - I -1 I 

1 001010001010000011 oioipoooi inootooj 

161 21 57 fill 

Figure 10. Bit-Length Specification 
(Multiple Constants) 


The symbol used as a name entry in a DC 
assembler instruction takes on the length 
attribute of the first constant in the 
list; therefore the implied length of 
BLMCON in Figure 10 is two bytes. 


If duplication is specified, filling 
occurs once at the end of the field 
occupied by the duplicated constant(s) . 


When bit-length specification is used in 
association with multiple operands, 
assembly of the constant(s) in each 
succeeding operand starts at the next 
available bit. Figure 11 illustrates this. 

As coded: 

r- T -1- 1 

] |Oper-|Operand | 

|Name jationj j 

j.-f- \ -•] 

j BLMOCON j DC |FL.7'9*,CL.10'AB',XL.14'C4* j 

L-X-X-J 

In storage: 

byte byte byte byte byte 

ill!! 

|padding | |padding ] f 


1 0001001111000001 1 ] 1 0000001110001 000 , ] 

9 | A I C4 <fill 


A plus 
first two 
bits of B 

Figure 11. Bit-Length Specification 
(Multiple Operands) 


In Figure 11, three different types of 
constants have been specified, one to an 
operand. Note that the character constant 
'AB' which normally would occupy 16 bits is 
truncated on the right to fit the 10-bit 
field designated. Note that filling occurs 
only at the end of the field occupied by 
all the constants. 


SCALE MODIFIER : This modifier is written 
as Sn, where n is either a decimal value or 
an absolute expression enclosed by 
parentheses. Any symbol in the expression 
must be previously defined. The decimal 
value or the parenthesized expression may 
be preceded by a sign; if none is present, 
a plus sign is assumed. The maximum values 
for scale modifiers are summarized in 
Appendix F. 

A scale modifier may be used with 
fixed-point (F, H) and floating-point (E, 

D, and L) constants only. It is used to 
specify the amount of internal scaling that 
is desired, as follows. 

Scale Modifier for Fixed-Point Constants . 
The scale modifier specifies the power of 
two by which the constant must be 
multiplied after it has been converted to 
its binary representation. Just as 
multiplication of a decimal number by a 
power of 10 causes the decimal point to 
move, multiplication of a binary number by 
a power of two causes the binary point to 
move. This multiplication has the effect 
of moving the binary point away from its 
assumed position in the binary field; the 
assumed position being to the right of the 
rightmost position. 

Thus, the scale modifier indicates 
either of the following: (1) the number of 

binary positions to be occupied by the 
fractional portion of the binary number, or 
(2) the number of binary positions to be 
deleted from the integral portion of the 
binary number. A positive scale of x 
shifts the integral portion of the number x 
binary positions to the left, thereby 
reserving the rightmost x binary positions 
for the fractional portion. A negative 
scale shifts the integral portion of the 
number right, thereby deleting rightmost 
integral positions. If a scale modifier 
does not accompany a fixed-point constant 
containing a fractional part, the 
fractional part is lost . 

In all cases where positions are lost 
because of scaling (or the lack of 
scaling), rounding occurs in the leftmost 
bit of the lost portion. The rounding is 
reflected in the rightmost position saved. 

Scale Modifier for Floating-Point 
Constants . Only a positive scale modifier 
may be used with a floating-point constant. 
It indicates the number of hexadecimal 
positions that the fraction is to be 
shifted to the right. Note that this shift 
amount is in terms of hexadecimal 
positions, each of which is four binary 
positions. (A positive scaling actually 
indicates that the point is to be moved to 
the left. However, a floating-point 
constant is always converted to a 
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fraction,which is hexadecimally normalized. 
The point is assumed to be at the left of 
the leftmost position in the field. Since 
the point cannot be moved left, the 
fraction is shifted right.) 

Thus, scaling that is specified for a 
floating-point constant provides an 
assembled fraction that is unnormalized, 
i.e., contains hexadecimal zeros in the 
leftmost positions of the fraction. When 
the fraction is shifted, the exponent is 
adjusted accordingly to retain the correct 
magnitude. When hexadecimal positions are 
lost, rounding occurs in the leftmost 
hexadecimal position of the lost portion. 
The rounding is reflected in the rightmost 
hexadecimal position saved. 

EXPONENT MODIFIER : This modifier is 
written as En, where n is either a decimal 
self-defining term or an absolute 
expression enclosed by parentheses. Any 
symbols in the expression must be 
previously defined. The decimal value or 
the parenthesized expression may be 
preceded by a sign; if none is present, a 
plus sign is assumed. The maximum values 
for exponent modifiers are summarized in 
Appendix F. 

An exponent modifier may be used with 
fixed-point (F, H) and floating-point (E, 

D, and L) constants only. The modifier 
denotes the power of 10 by which the 
constant is to be multiplied before its 
conversion to the proper internal format. 

This modifier is not to be confused with 
the exponent of the constant itself, which 
is specified as part of the constant and is 
explained under "Operand Subfield 4: 
Constant." Both are denoted in the same 
fashion, as En. The exponent modifier 
affects each constant in the operand, 
whereas the exponent written as part of the 
constant only pertains to that constant. 
Thus, a constant may be specified with an 
exponent of +2, and an exponent modifier of 
♦5 may precede the constant. In effect, 
the constant has an exponent of +7. 

Note that there is a maximum value, both 
positive and negative, listed in Appendix F 
for exponents. This applies to the 
exponent modifier and to the sum of the 
exponent modifier and the exponent 
specified as part of the constant. 


Operand Subfield 4: Constant 


This subfield supplies the constant (or 
constants) described by the subfields that 
precede it. A data constant (all types 
except A, Y, S, and V) is enclosed by 


apostrophes. An address constant (types A, 
Y, S, and V) is enclosed by parentheses. 

To specify two or more constants in the 
subfield, the constants must be separated 
by commas and the entire sequence of 
constants must be enclosed by the 
appropriate delimiters (i.e., apostrophes 
or parentheses) . Thus, the format for 
specifying the constant (s) is one of the 
following: 


r- T -1| 

| Single | Multiple j 

jConstant j Constants* | 

f- + -1 

I I I 

j'constant* | 'constant,...,constant* | 

| (constant) | (constant,...,constant) j 


j 1 Not permitted for character, j 
j hexadecimal, and binary constants. j 
L-J 


All constant types except character (C) , 
hexadecimal (X) , binary (B) , packed decimal 
(P), and zoned decimal (Z), are aligned on 
the proper boundary, as shown in Appendix 
F, unless a length modifier is specified. 

In the presence of a length modifier, no 
boundary alignment is performed. If the 
operand specifies more than one constant, 
any necessary alignment applies to the 
first constant only. Thus, for an operand 
that provides five fullword constants, the 
first would be aligned on a fullword 
boundary, and the rest would automatically 
fall on fullword boundaries. 

The total storage requirement of the 
operand is the product of the length times 
the number of constants in the operand 
times the duplication factor (if present) 
plus any bytes skipped for boundary 
alignment. 

If an address constant contains a 
location counter reference, the location 
counter value that is used is the storage 
address of the first byte the constant will 
occupy. Thus, if several address constants 
in the same instruction refer to the 
location counter , the value of the 
location counter varies from constant to 
constant. Similarly, if a single constant 
is specified (and it is a location counter 
reference) with a duplication factor, the 
constant is duplicated with a varying 
location counter value. 

E and H constants are converted as if 
they were D and F, respectively, and then 
shortened. 

The subsequent text describes each of 
the constant types and provides examples. 
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Character Constant—C . Any of the valid 
256 punch combinations may be designated in 
a character constant. Only one character 
constant may be specified per operand. 

Special consideration must be given to 
representing apostrophes and ampersands as 
characters. Each apostrophe or ampersand 
desired as a character in the constant must 
be represented by a pair of apostrophes or 
ampersands. Only one apostrophe or 
ampersand appears in storage. 

The maximum length of a character 
constant is 256 bytes. No boundary 
alignment is performed. Each character is 
translated into one byte. Double 
apostrophes or double ampersands count as 
one character. If no length modifier is 
given, the size in bytes of the character 
constant is equal to the number of 
characters in the constant. If a length 
modifier is provided, the result varies as 
follows: 

1. If the number of characters in the 
constant exceeds the specified length 
as many rightmost bytes as necessary 
are dropped. 

2. If the number of characters is less 
than the specified length; the excess 
rightmost bytes are filled with 
blanks. 

In the following example, the length 
attribute of FIELD is 12: 


r- t-t- 

| Name (Operation)Operand 

I-- + - 1 - 

(FIELD (DC J C * TOTAL IS 110* 

L_J.- X _ 


r- t- t 

(Name (Operation(Operand | 

j.-+- i -1 

(FIELD (DC j 3CL4'ABODE* j 

L- X -J. -.-J 


The generated constant would be: 
ABCDABCDABCD 

On the other hand, if the length had 
been specified as six instead of four, the 
generated constant would have been: 

ABCDE ABCDE AECDE 

Note that the same constant could be 
specified as a literal. 

r - T - T -n 

(Name (Operation(Operand ( 

f- + - + -1 

j (MVC (AREA (12) ,=3CL4*ABCDE* j 

l- X - X -J 


Hexadecimal Constant—X . A hexadecimal 
constant consists of one or more of the 
hexadecimal digits, which are 0-9 and A-F. 
Only one hexadecimal constant may be 
specified per operand. The maximum length 
of a hexadecimal constant is 256 bytes (512 
hexadecimal digits). No word boundary 
alignment is performed. 

Constants that contain an even number of 
hexadecimal digits are translated as one 
byte per pair of digits. If an odd number 
J of digits is specified, the leftmost byte 
-j has the leftmost four bits filled with a 
j hexadecimal zero, while the rightmost four 
J bits contain the odd (first) digit. 


However, in this next example, the 
length attribute is 15, and three blanks 
appear in storage to the right of the zero: 

r - r - T - n 

(Name (Operation(Operand j 

F- + -+-^ 

(FIELD (DC (CL15'TOTAL IS 110* j 

L___ X - X -,-J 

In the next example, the length 
attribute of FIELD is 12, although 13 
characters appear in the operand. The two 
ampersands count as only one byte. 

r- t-t-1 

(Name (Operation|Operand | 

j.-1-1--| 

jFIELD j DC j C'TOTAL IS 6S10* j 

i _ x - x _J 

Note that in the next example, a length 
of four has been specified, but there are 
five characters in the constant. 


If no length modifier is given, the 
implied length of the constant is half the 
number of hexadecimal digits in the 
constant (assuming that a hexadecimal zero 
is added to an odd number of digits). If a 
length modifier is given, the constant is 
handled as follows: 

1. If the number of hexadecimal digit 
pairs exceeds the specified length, 
the necessary leftmost bits (and/or 
bytes) are dropped. 

2. If the number of hexadecimal digit 
pairs is less than the specified 
length, the necessary bits (and/or 
bytes) are added to the left and 
filled with hexadecimal zeros. 

An eight-digit hexadecimal constant 
provides a convenient way to set the bit 
patterii of a full binary word. The 
constant is the following example would set 
the first and third bytes of a word to I's. 
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r-T-T-T 

| Name |Operation!Operand | 

t - + - + - 1 

i j DS {OF I 

jTEST j DC JX'FFOOFFOO* j 

L- X - X _J 


The DS instruction sets the location 
counter to a fullword boundary. 

The next example uses a hexadecimal 
constant as a literal and inserts Is into 
bits 24 through 31 of register 5. 

r - T - T ---1 

(Name |Operation!Operand | 

F-+-f-1 

j jlC |5,=X*FF' INSERT CHAR. j 

L- X _ X _J 

In the following example, the digit A 
would be dropped, because five hexadecimal 
digits are specified for a length of two 
bytes: 

f - T -IT-T 

|Name JOperation!Operand | 

- + -+-i 

j ALPHACON j DC j3XL2 , A6F4E' j 

L- X - X _J 

The resulting constant would be 6F4E, 
which would occupy the specified two bytes. 
It would then be duplicated three times, as 
requested by the duplication factor. If it 
had merely been specified as X'A6F4E', the 
resulting constant would have had a 
hexadecimal zero in the leftmost position: 

0A6F4E 


Binary Constant—B . A binary constant is 
written using 1*s and 0's enclosed in 
apostrophes. Only one binary constant may 
be specified per operand. Duplication and 
length may be specified. The maximum 
length of a binary constant is 256 bytes. 

The implied length of a binary constant 
is the number of bytes occupied by the 
constant including any padding necessary. 
Padding or truncation takes place on the 
left. The padding bit used is a 0. 

The following example shows the coding 
used to designate a binary constant. BCON 
would have a length attribute of one. 

r- t-t -i 

!Name {Operation{Operand { 

y - + - + - 1 

j BCON j DC JB*11011101' j 

|BTRUNC j DC |BL1»100100011* j 

{BPAD {DC j BL1 * 101* | 

i- X _i_j 


BTRUNC would assemble with the leftmost 
bit truncated, as follows: 

00100011 


BPAD would assemble with five zeros as 
padding, as follows: 

00000101 


Fixed-Point Constants—F and H . A 
fixed-point constant is written as a 
decimal number, which may be followed by a 
decimal exponent if desired. The number 
may be an integer, a fraction, or a mixed 
number (i.e., one with integral and 
fractional portions). The format of the 
constant is as follows: 

1. The number is written as a signed or 
unsigned decimal value. The decimal 
point may be placed before, within, or 
after the number, or it may be 
omitted, in which case the number is 
assumed to be an integer. A positive 
sign is assumed if an unsigned number 
is specified. Unless a scale modifier 
accompanies a mixed number or 
fraction, the fractional portion is 
lost, as explained under "Subfield 3: 
Modifiers." 

2. The exponent is optional. If 
specified, it is written immediately 
after the number as En, where n is an 
optionally signed decimal value 
specifying the exponent of the factor 
10. The exponent may be in the range 
-85 to +75. If an unsigned exponent 
is specified, a plus sign is assumed. 
The exponent causes the value of the 
constant to be adjusted by the power 
of 10 that it specifies. The exponent 
may exceed the permissible range for 
exponents provided that the sum of the 
exponent and the exponent modifier do 
not exceed that range. 

The number is converted to a binary 
number. The binary number is then rounded 
and assembled into the proper field, 
according to the specified or implied 
length. If the value of the number exceeds 
the length specified or implied, the sign 
is lost, the necessary leftmost bits are 
truncated to the length of the field and 
the value is then assembled into the whole 
field. Any duplication factor that is 
present is applied after the constant is 
assembled. A negative number is carried in 
2*s complement form. The resulting number 
will not differ from the exact value by 
more than one in the last place. 

An implied length of four bytes is 
assumed for a fullword (F) and two bytes 
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for a halfword (H) , and the constant is 
aligned to the proper fullword or halfword 
boundary, if a length is not specified. 
However, any length up to and including 
eight bytes may be specified for either 
type of constant by a length modifier, in 
which case no boundary alignment occurs. 

Maximum and minimum values, exclusive of 
scaling, for fixed-point constants are: 


Length 

Max 

Min 

8 

2 63 - 1 

-2 63 

4 

2 3 <1 — i 

-2 3 * 

2 

2*3-1 


1 

2 7 - 1 

-2 7 

.4 

2 3 - 1 

-2 3 

.2 

2 i-i 

-2* 

.1 

0 

-1 


A field of three fullwords is generated 
from the statement shown below. The 
location attribute of CONWRD is the address 
of the leftmost byte of the first word, and 
the length attribute is four, the implied 
length for a fullword fixed-point constant. 
The expression CONWRE+4 could be used to 
address the second constant (second word) 
in the field. 


r - T - T - 

(Name (Operation|Operand 

I-- + -+- 

(CONWRD (DC (3F*658474' 


L-X-X 


1 

I 

A 

I 

.J 


The next statement causes the generation 
of a two-byte field containing a negative 
constant. Notice that scaling has been 
specified in order to reserve six bits for 
the fractional portion of the constant. 


r- T - T - 1 

(Name |OperationJOperand J 

- + -1-1 

(HALFCON j DC |HS6'-25.46' j 

L-X-X-J 

The next constant (3.50) is multiplied 
by 10 to the -2 before being converted to 
its binary format. The scale modifier 
reserves twelve bits for the fractional 
portion. 


The final example specifies three 
constants. Notice that the scale modifier 
requests four bits for the fractional 
portion of each constant. The four bits 
are provided whether or not the fraction 
exists. 

f-T-T-1 

(Name (Operation(0 perand | 


jTHREECON J DC j FS4 '1 0, 25.3, 100 ' j 

L-X-L-J 

Floating-Point Constants—E, D, and L . A 
floating-point constant is written as a 
decimal number, which may be followed by a 
decimal exponent, if desired. The number 
may be an integer, a fraction, or a mixed 
number (i.e., one with integral and 
fractional portions). The format of the 
constant is as follows: 

1. The number is written as a signed or 
unsigned decimal value. The decimal 
point may be placed before, within, or 
after the number, or it may be 
omitted, in which case, the number is 
assumed to be an integer. A positive 
sign is assumed if an unsigned number 
is specified. 

2. The exponent is optional. If 
specified, it is written immediately 
after the number as En, where n is an 
optionally signed decimal value 
specifying the exponent of the factor 
10. The exponent may be in the range 
-85 to +78. The exponent may exceed 
the permissible range for exponents, 
provided that the sum of the exponent 
and the exponent modifier does not 
exceed that range. If an unsigned 
exponent is specified, a plus sign is 
assumed. 

Machine format for a floating-point 
number is in two parts: the portion 
containing the exponent, which is sometimes 
called the characteristic, followed by the 
portion containing the fraction, which is 
sometimes called the mantissa. Figure 12 
shows the external format of the three 
types of floating-point constants. 


r-T-T- 

|Name |Operation|Operand 

j.-1-+- 

j FULLCON(DC jHS12'3.50E-2 

l-X-X- 

The same constant could be specified as 
a literal: 

r-T- t-1 

(Name |Operation(Operand f 

|--+-+-1 

| (AH j 7,=HS12 * 3.50E-2 * ( 

L-X-X_J 


As shown in the figure, the format of 
the type L constant is similar to that of 
•( two contiguous type D constants, except 
that it is assembled with the sign of the 
second double word equal to that of the 
first, and the characteristic of the second 
equal to that of the first minus 14, module 
128. The type L constant has been 
implemented to provide the programmer with 
extended precision floating-point 
constants. 

Since the machine format of a floating¬ 
point constant only consists of a fraction 
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SHORT FLOATING POINT NUMBER (E) 

r- t-1-1 

j j 7 BIT S | 

| S j CHARAC- j i 

| j TERISTIC j J 

L-J.-J-J 

0 7 8 31 


LONG FLOATING POINT NUMBER (D) 

-1 

I 

56-BIT FRACTION 


0 7 8 63 

EXTENDED FLOATING POINT NUMBER (L) 

f - T -p 

j j 7 BIT j 

j S j CHARAC- | 

I | TERISTIC j 

L- X. -i. 

0 7 8 63 


HIGH ORDER HALF OF 
112 BIT FRACTION 


| 7 BIT | 

| CHARAC- j 
1 TERISTIC j 

_L 


r - r - n 

j j LOW ORDER HALF OF J 

j j 112 BIT FRACTION j 

L-J.-J 

0 7 8 63 

Figure 12. Floating-Point External Formats 


and an exponent, the number specified as a 
floating-point constant must be converted 
to a fraction before it can b.e translated 
into the proper format. For example, the 
constant 27.35E2 represents the number 
27.35 times 10 to the 2nd. Represented as 
a fraction, it would be .2735 times 10 to 
the 4th, the exponent having been modified 
to reflect the shifting of the decimal 
point. The exponent may also be affected 
by the presence of an exponent modifier, as 
explained under "Operand Subfield 3: 
Modifiers." 

The exponent is then translated into its 
binary equivalent, and the fraction is 
converted to a binary number. Scaling is 
performed if specified; if not, the 
fraction is normalized (leading hexadecimal 
zeros are removed). Rounding of the 
fraction is then performed according to the 
specified or implied length, and the number 
is assembled into the proper field. Within 
the portion of the floating-point field 
allocated to the fraction, the hexadecimal 
point is assumed to be to the left of the 
leftmost hexadecimal digit, and the 
fraction occupies the leftmost portion of 
the field. Negative fractions are carried 
in true representation, not in the 2's 
complement form. The resulting number will 
not differ from the exact value by more 
than one in the last place. An implied 
length of four bytes is assumed for a short 


(E) constant and eight bytes for a long (D) 
constant. An implied length of 16 bytes is 
assumed for an extended (L) constant. The 
constant is aligned at the proper word (E) 
or double word (D and L) boundary if a 
length is not specified. However, any 
length up to and including eight bytes (E 
and D) or 16 bytes (L) can be specified by 
a length modifier. In this case, no 
boundary alignment occurs. 


Any of the following statements could be 
used to specify 46.415 as a positive, 
fullword, floating-point constant; the last 
is a machine instruction statement with a 
literal operand. Note that the last two 
constants contain an exponent modifier. 


r - T -T-1 

| Name (Operation)Operand I 

(-- \ - 4 - 1 

| | DC jE'46.415' j 

j |DC |E , 46415E-3* | 

j (DC |E'+464.15E-1' | 

j |DC |E' +.46415E+2' j 

j (DC |EE2*.46415' j 

| |AE |6,=EE2'.46415' | 


The following would each be generated as 
doubleword floating-point constants. 
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r- t-t-1 

(Name |Operation!Operand J 

J--f-f-- 

j FLOAT j DC j DE + 4 * + 46,-3.729,+473* j 

L-X-1_J 


Decimal Constants—P and Z . A decimal 
constant is written as a signed or unsigned 
decimal value. If the sign is omitted, a 
plus sign is assumed. The decimal point 
may be written wherever desired or may be 
omitted. Scaling and exponent modifiers 
may not be specified for decimal constants. 
The maximum length of a decimal constant is 
16 bytes. No word boundary alignment is 
performed. 


1. If the constant requires fewer bytes 
than the length specifies, the 
necessary number of bytes is added to 
the left. For zoned decimal format, 
the decimal digit zero is placed in 
each added byte. For packed decimals, 
the bits of each added byte are set to 
zero. 

2. If the constant requires more bytes 
than the length specifies, the 
necessary number of leftmost digits or 
pairs of digits is dropped, depending 
on which format is specified. 

Examples of decimal constant definitions 
follow. 


The placement of a decimal point in the 
definition does not affect the assembly of 
the constant in any way, because, unlike 
fixed-point and floating-point constants, a 
decimal constant is not converted to its 
binary equivalent. The fact that a decimal 
constant is an integer, a fraction, or a 
mixed number is not pertinent to its 
generation. Furthermore, the decimal point 
is not assembled into the constant. The 
programmer may determine proper decimal 
point alignment either by defining his data 
so that the point is aligned or by 
selecting machine instructions that will 
operate on the data properly (i.e., shift 
it for purposes of alignment). 

If zoned decimal format is specified 
(Z) , each decimal digit is translated into 
one byte. The translation is done 
according to the character set shown in 
Appendix A. The rightmost byte contains 
the sign as well as the rightmost digit. 

For packed decimal format (P), each pair of 
decimal digits is translated into one byte., 
The rightmost digit and the sign are 
translated into the rightmost byte. The 
bit configuration for the digits is 
identical to the configurations for the 
hexadecimal digits 0-9 as shown in Section 
3 under "Hexadecimal Self-Defining Value." 
For both packed and zoned decimals, a plus 
sign is translated into the hexadecimal 
digit C, and a minus sign into the digit D. 

If an even number of packed decimal 
digits is specified, one digit will be left 
unpaired, because the rightmost digit is 
paired with the sign. Therefore, in the 
leftmost byte, the leftmost four bits will 
be set to zeros and the rightmost four bits 
will contain the odd (first) digit. 

If no length modifier is given, the 
implied length for either constant is the 
number of bytes the constant occupies 
(taking into account the format, sign, and 
possible addition of zero bits for packed 
decimals). If a length modifier is given, 
the constant is handled as follows: 


r- 

| Name 


"T-T- 

(Operation|Operand 


-7-- 

T ~ ~ ~ -- • 

j DC 

|P"+1 .25* 

(DC 

|Z*-543* 

| DC 

^•79.68' 

j DC 

(PL3 *79.68' 

-L-— 

__I_ _ __ 


The following statement specifies three 
packed decimal constants. The length 
modifier applies to each packed decimal 
constant. 


i-r- t- 1 

jName (OperationJOperand J 

j.- 4 - + -^ 

| DECIMALS j DC JPL8• + 25.8,-3874,+ 2.3* j 

i _ x _L-J 


The last example illustrates the use of 
a packed decimal literal. 


r - t-T- - -1 

(Name (Operation|Operand ( 

I-- 4 - 4 -^ 

J j UNPK j OUTAREA,=PL2 * *25 * J 

L-_,==.=A—_L_J 

ADDRESS CONSTANTS : An address constant is 
a storage address that is translated into a 
constant. Address constants can be used 
for initializing base registers to 
facilitate the addressing of storage. 
Furthermore, they provide the means of 
communicating between control sections of a 
multisection program. However, storage 
addressing and control section 
communication are also dependent on the use 
of the USING assembler instruction and the 
loading of registers. Coding examples that 
illustrate these considerations are 
provided in Section 3 under "Programming 
with the Using Instruction." 

An address constant, unlike other types 
of constants, is enclosed in parentheses. 

If two or more address constants are 
specified in a statement, they are 
separated by commas, and the entire 
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sequence is enclosed by parentheses. There 
are four types of address constants: A, Y, 
S, and V. 


Complex Relocatable Expressions . A complex 
relocatable expression can only be used in 
an A-type or Y-type address constant. 

These expressions contain two or more 
unpaired relocatable terms and/or a 
negative relocatable term in addition to 
any absolute or paired relocatable terms 
that may be present. In contrast to 
relocatable expressions, complex 
relocatable expressions may represent 
negative values. A complex relocatable 
expression might consist of external 
symbols (which cannot be paired) and 
designate an address in an independent 
assembly that is to be linked and loaded 
with the assembly containing the address 
constant. 


The value of the expression is 
determined when the referenced control 
sections are loaded. Complex relocatable 
expressions can be used to determine the 
distance between two control sections after 
they are loaded into main storage. 


A-Type Address Constant . This constant is 
specified as an absolute, relocatable, or 
complex relocatable expression. (Remember 
that an expression may be single term or 
multiterm.) The value of the expression is 
calculated to 32 bits as explained in 
Section 2, with one exception: the maximum 
value of the expression may be 2 3,, -1. The 
value is then truncated on the left, if 
necessary, to the specified or implied 
length of the field and assembled into the 
rightmost bits of the field. The implied 
length of an A-type constant is four bytes 
and alignment is to a fullword boundary 
unless a length is specified, in which case 
no ^alignment will occur. The length that 
may be specified depends on the type of 
expression used for the constant; a length 
of 1-4 bytes (.1 (1 bit) to 4 bytes for DOS 

F) may be used for an absolute expressions, 
while a length of 3 or 4 bytes may be used 
for a relocatable or complex relocatable 
expression. 

In the following examples, the field 
generated from the statement named ACON 
contains four constants, each of which 
occupies four bytes. Note that there is a 
location counter reference in one. The 
value of the location counter will be the 
address of the first byte allocated to the 
fourth constant. The second statement 
shows the same set of constants specified 
as literals (i.e., address constant 
literals). 


r - r -T 

I |Oper-1 
jName|ation(Operand | 


j ACON j DC |A (108,LOP,END-STRT,* + 4096) j 

' |LM |4,7,=A (108,LOP,END-STRT,* + 4096) j 
j_l_L_ Z. _J 


Note : When the location counter reference 
occurs in a literal, as in the LM 
instruction above, the value of the 
location counter is the address of the 
first byte of the instruction. 

Y-type Address Constant . A Y-type address 
constant has much in common with the A-type 
constant. It, too, is specified as an 
absolute, relocatable, or complex 
relocatable expression. The value of the 
expression is also calculated to 32 bits as 
explained in Section 2. However, the 
maximum value of the expression may be only 
2i5_i. <j>he value is then truncated, if 
necessary, to the specified or implied 
length of the field and assembled into the 
rightmost bits of the field. The implied 
length of a Y-type constant is two bytes 
and alignment is to a halfword boundary 
unless a length is specified, in which case 
no alignment occurs. The maximum length of 
a Y-type address constant is two bytes. If 
length specification is used, a length of 
two bytes may be designated for a 
relocatable or complex expression and 1 or 
2 bytes (.1 (1 bit) to 2 bytes for DOS F) 

for an absolute expression. 

Caution : Specification of relocatable 

Y-type address constants should be avoided 
in programs destined to be executed on 
machines having more than 32,767 bytes of 
storage capacity. 

S-Type Address Constant . The S-type 
address constant is used to store an 
address in base displacement form. 

The constant may be specified in two 
ways: 

1. As an absolute or relocatable 
expression, e.g., S (EETA). 

2. As two absolute expressions, the first 
of which represents the displacement 
value and the second, the base 
register, e.g., S (400 (13)). 

The address value represented by the 
expression in (1) will be broken down by 
the assembler into the proper base register 
and displacement value. An S-type constant 
is assembled as a halfword and aligned on a 
halfword boundary. The leftmost four bits 
of the assembled constant represents the 
base register designation; the remaining 12 
bits, the displacement value. 
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If length specification is used, only 
two bytes may be specified. S-type address 
constants may not be specified as literals. 


V-Type Address Constant . This constant is 
used to reserve storage for the address of 
an external symbol that is used for 
effecting branches to other programs. To 
maintain compatibility with the OS 
assemblers, the constant should not be used 
for external data reference. The constant 
is specified as one relocatable symbol, 
which need not be identified by an EXTRN 
statement. Whatever symbol is used is 
assumed to be an external symbol by virtue 
of the fact that it is supplied in a V-type 
address constant. To suppress the AUTOLINK 
function of the linkage editor for a 
constant identified in a V-type address 
constant, the programmer can identify it in 
a WXTRN statement (DOS Assembler 14K D 
only) . 

Note that specifying a symbol as the 
operand of a V-type constant does not 
constitute a definition of the symbol for 
this assembly. The implied length of a 
V-type address constant is four bytes, and 
boundary alignment is to a fullword. A 
length modifier may be used to specify a 
length of either three or four bytes, in 
which case no such boundary alignment 
occurs. In the following example, 12 bytes 
will be reserved, because there are three 
symbols. The value of each assembled 
constant will be zero until the program is 
loaded. 

r - T -T-1 

| Name |Operation|Operand | 

I-- + -+-1 

|VCONST jDC JV (SORT,MERGE,CALC) j 

i___ j. _x-J 


PS—DEFINE STORAGE 


exactly the same subfields are employed and 
are written in exactly the same sequence as 
they are in the DC operand. Although the 
formats are identical, there are two 
differences in the specification of 
subfields. They are: 

1. The specification of data (subfield 4) 
is optional in a DS operand, but it is 
mandatory in a DC operand. If a 
constant is specified, it must be 
valid. 

2. The maximum length that may be 
specified for character (C) and 
hexadecimal (X) field types is 65,535 
bytes rather than 256 bytes. 

If a DS operand specifies a constant in 
subfield 4, and no length is specified in 
subfield 3, the assembler determines the 
length of the data and reserves the 
appropriate amount of storage, it does not 
assemble the constant . The ability to 
specify data and have the assembler 
calculate the storage area that would be 
required for such data is a convenience to 
the programmer. If he knows the general 
format of the data that will be placed in 
the storage area during program execution, 
all he needs to do is show it as the fourth 
subfield in a DS operand. The assembler 
then determines the correct amount of 
storage to be reserved, thus relieving the 
programmer of length considerations. 

If the DS instruction is named by a 
symbol, its value attribute is the location 
of the leftmost byte of the reserved area. 
The length attribute of the symbol is 
determined in the same manner as for a EC. 
Any positioning required for aligning the 
storage area to the proper type of boundary 
is done before the address value is 
determined. Bytes skipped for alignment 
are not set to zero. 



4 




The DS instruction is used to reserve areas 
of storage and to assign names to those 
areas. The use of this instruction is the 
preferred way of symbolically defining 
storage for work areas, input/output areas, 
etc. The typical form of the DS statement 
is: 


"T-T- 

j Operation|Operand 


|Name 


f- + -+-1 

|Any |DS |One operand (D assem- 

jsymbol j jbler) or one or more 

jOr not j joperands (F assembler) 

|used j jin the format de- 

j scribed below, each 
jseparated by a comma, 
i—--x_x_j 


The format of the DS operand is 
identical to that of the EC operand; 


Each field type (e.g., hexadecimal, 
character, floating-point) is associated 
with certain characteristics (these are 
summarized in Appendix F). The associated 
characteristics will determine which 
field-type code the programmer selects for 
the DS operand and what other information 
he adds, notably a length specification or 
a duplication factor. For example, the E 
floating-point field and the F fixed-point 
field both have an implied length of four 
bytes. The leftmost byte is aligned to a 
fullword boundary. Thus, either code could 
be specified if it were desired to reserve 
four bytes of storage aligned to a fullword 
boundary. To obtain a length of eight 
bytes, one could specify either the E or F 
field type with a length modifier of eight. 
However, a duplication factor would have to 
be used to reserve a larger area, because 
the maximum length specification for either 


pv 


58 Part 2: Basic Functions of the Assembler Language 











type is eight bytes. Note also that 
specifying length would cancel any special 
boundary alignment. 

In contrast, packed and zoned decimal (P 
and Z) , character (C) , hexadecimal (X) , and 
binary (B) fields have an implied length of 
one byte. Any of these codes, if used, 
would have to be accompanied by a length 
modifier, unless just one byte is to be 
reserved. Although no alignment occurs, 
the use of C and X field types permits 
greater latitude in length specifications, 
the maximum for either type being 65,535 
bytes. (Note that this differs from the 
maximum for these types in a DC 
instruction.) Unless a field of one byte 
is desired, either the length must be 
specified for the C, X, P, Z, or B field 
types, or else the data must be specified 
(as the fourth subfield), so that the 
assembler can calculate the length. 

To define four 10-byte fields and one 
100-byte field, the respective DS 
statements might be as follows: 


Special Uses of the Duplication Factor 


FORCING ALIGNMENT : The location counter 
can be forced to a doubleword, fullword, or 
halfword boundary by using the appropriate 
field type (e.g., D, F, or H) with a 
duplication factor of zero. This method 
may be used to obtain boundary alignment 
that otherwise would not be provided. For 
example, the following statements would set 
the location counter to the next doubleword 
boundary and then reserve storage space for 
a 128-byte field (whose leftmost byte would 
be on a doubleword boundary). 


r --f-T- 

| Name {Operation|Operand 

|---|.- + - 

| |DS jOD 

j AREA |DS JCL128 

I- X _ X _ 


H 

I 

I 


(Name jOperationjOperand 

|--+-f- 

jFIELD JDS J4CL10 

jAREA |DS jCLIOO 

L- X -i.- 


I 

A 


j 


Although FIELD might have been specified 
as one 40-byte field, the preceding 
definition has the advantage of providing 
FIELD with a length attribute of 10. This 
would be pertinent when using FIELD as a SS 
machine instruction operand. 

Additional examples of DS statements are 
shown below: 


DEFINING FIELDS OF AN AREA : A DS 
instruction with a duplication factor of 
zero can be used to assign a name, to an 
area of storage without actually reserving 
the area. Additional DS and/or EC 
instructions may then be used to reserve 
the area and assign names to fields within 
the area (and generate constants if DC is 
used) . 


For example, assume that 80-character 
records are to be read into an area for 
processing and that each record has the 
following format: 


r _- 

|Name 

L 

— r - - r - 

|Operation) 

_ _L 

Operand 

ONE 

|ds 

T 

1 

CL80 (one 80-byte 

TWO 

1 

1 

|DS 

1 

1 

1 

field, length 
attribute of 80) 

80C (80 one-byte 

THREE 

1 

1 

|DS 

1 

1 

1 

fields, length 
attribute of one) 

6F (six fullwords. 

FOUR 

1 

1 

|DS 

1 

1 

1 

length attribute of 
four) 

D (one doubleword. 

FIVE 

1 

1 

|DS 

1 

1 

1 

length attribute of 
eight) 

4H (four halfwords. 


1 

1 

1 

1 

length attribute of 
two) 


i- x - x _j 


Note : A DS statement causes the storage 
area to be reserved but not set to zeros. 
No assumption should be made as to the 
contents of the reserved area. 


Positions 5-10 
Positions 11-30 
Positions 31-36 
Positions 47-54 
Positions 55-62 


Payroll Number 
Employee Name 
Date 

Gross Wages 
Withholding Tax 


The following example illustrates how ES 
instructions might be used to assign a name 
to the record area, then define the fields 
of the area and allocate the storage for 
them. Note that the first statement names 
the entire area by defining the symbol 
RDAREA; the statement gives REAREA a length 
attribute of 80 bytes, but does not reserve 
any storage. Similarly, the fifth 
statement names a 6-byte area by defining 
the symbol DATE; the three subsequent 
statements actually define the fields of 
DATE and allocate storage for them. The 
second, ninth, and last statements are used 
for spacing purposes and, therefore, are 
not named. 
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r - T -1-1 


Name 

j Operation 

i.... 

Operand 

RDAREA 

T 

|DS 

0CL80 


|DS 

CL 4 

PAYNO 

|DS 

CL6 

NAME 

JDS 

CL20 

DATE 

|DS 

0CL6 

DAY 

|DS 

CL2 

MONTH 

|DS 

CL2 

YEAR 

|DS 

CL2 


|DS 

CLIO 

GROSS 

|DS 

CL8 

FEDTAX 

|DS 

CL 8 

DS 

1 

CL 18 



L___ 


CCW—DEFINE CHANNEL COMMAND WORD 


r-7- t-1 

1 Name j Operation|Operand | 

j.-4-4-1 

J |CCW J 2,READAREA ,X' 4 8 ',80 | 

L_J_L_I 


Note that the form of the third operand 
sets bits 37-39 to zero, as required. The 
bit pattern of this operand is as follows: 


32-35 36-39 

0100 1000 


If there is a symbol in the name entry 
of the CCW instruction, it is assigned the 
address value of the leftmost byte of the 
channel command word. The length attribute 
of the symbol is eight. 


The CCW instruction provides a convenient 
way to define and generate an eight-byte 
channel command word aligned at a 
doubleword boundary. The internal machine 
format of a channel command word is shown 
in Figure 12. CCW will cause any bytes 
skipped to be zeroed. The typical form of 
the CCW instruction statement is: 


" T -1- 

|Operation! Operand 


I Name 


^- f -f- 


-^ 


| Any J CCW | Four operands, 

symbol orj j separated by commas, 

not used j | specifying the 

j contents of the 
| channel command word| 
J in the format 
j described in the 
| following text. 

L-j.-i.-j 


1-■- 

|Byte 

i 

"7-- ' 

| Bits 
j 

{Usage 

I . .. .-.... 

r 

| 1 

j 0-7 

"7 

{Command code 

j 2-4 

| 8-31 

{Data address 

1 5 

132-36 

{Flags 


|37-39 

|Must be zero 


| 40-47 

{Set to zero 

| 7-8 

|48-63 

j Count 

1_ 

.j._ 



Figure 13. Channel Command Word 


Listing Control Instructions 


All four operands must appear. They are 
written, from left to right, as follows: 

1. An absolute expression that specifies 
the command code. This expression's 
value is right-justified in byte 1. 

2. An expression specifying the data 
address. The value of this expression 
is in bytes 2-4. 

3. An absolute expression that specifies 
the flags for bits 32-36 and zeros for 
bits 37-39. The value of this 
expression is right-justified in byte 
5. (Byte 6 is set to zero.) 

4. An absolute expression that specifies 
the count. The value of this 
expression is right-justified in bytes 
7-8. 

The following is an example of a CCW 
statement: 


The listing control instructions are used 
to identify an assembly listing and 
assembly output cards, to provide blank 
lines in an assembly listing, and to 
designate how much detail is to be included 
in an assembly listing. In no case are 
instructions or constants generated in the 
object program. Listing control statements 
except PRINT are not printed, unless the 
statement is continued. Then the first 
card of the statement will be printed. 


TITLE—IDENTIFY ASSEMBLY OUTPUT 


The TITLE instruction enables the 
programmer to identify the assembly listing 
and assembly output cards. The typical 
form of the TITLE instruction statement is 
as follows: 
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1 


Name 

~T --T- 

| Operation)Operand 

x j. 

A special 

i title 

r 

JOne to 100 

symbol, a 

s 

j characters. 

sequence 

1 

jenclosed in 

symbol, a 

1 

j single 

variable 

1 

(apostrophes 

symbol, or 

1 

1 

not used 

1 

1 


-X _ 

_ x __ 


r-r- t 

|Name JOperation!Operand I 

F-4-4-4 

jPGMI j TITLE j'FIRST HEADING' j 

L—- X -J 

then, PGM1 is punched into all the output 
cards (columns 73-76) and this heading 
appears at the top of each page: FIRST 
HEADING. 


The name entry may contain a special 
symbol which is one to four alphabetic or 
numeric characters in any combination. The 
contents of the name entry are then punched 
into columns 73-76 of all the output cards 
for the program except those produced by 
the PUNCH and REPRO assembler instructions. 
Only the first TITLE statement in a program 
may have a special symbol or variable 
symbol in the name entry. The name field 
of all subsequent TITLE statements must be 
blank or contain a sequence symbol. 


The operand field may contain up to 100 
characters enclosed in apostrophes. Any 
ampersands or apostrophes enclosed within 
the surrounding apostrophes must be 
represented by two ampersands or 
apostrophes. 


If the following statement occurs later 
in the same program: 

r -j---1- 1 

|Name |Operation|Operand | 

F-4-4-4 

j j TITLE j'A NEW HEADING* j 

L- X - X -J 

then, PGM1 is still punched into the output 
cards, but each following page begins with 
the heading: A NEW HEADING. 

Note : The sequence number of the cards in 

the output deck is contained in columns 
77-80, except those produced by the PUNCH 
and REPRO assembler instructions. 


EJECT--START NEW PAGE 


The double ampersands and apostrophes 
punched into a TITLE card appear as single 
ampersands and apostrophes in a TITLE 
statement of an assembler listing. A 
single apostrophe between the enclosing 
apostrophes simply terminates the operand 
field. A single ampersand initiates an 
attempt to identify a variable symbol. If 
the variable symbol is not identifiable the 
statement is flagged as an error. 


However, it is the number of printed 
characters that are counted in the total 
number of operand characters. The contents 
of the name and operand field are printed 
at the top of each page of the assembly 
listing. 


A program may contain more than one 
TITLE statement. Each TITLE statement 
provides the heading for pages in the 
assembly listing that follow it, until 
another TITLE statement is encountered. 

Each TITLE statement encountered after the 
first one causes the listing to be advanced 
to a new page (before the heading is 
printed). 

For example, if the following statement 
is the first TITLE statement to appear in a 
program: 


The EJECT instruction causes the next line 
of the listing to appear at the top of a 
new page. This instruction provides a 
convenient way to separate routines in the 
program listing. The typical form of the 
EJECT instruction statement is as follows: 

r--"T-T~-•» 

|Name jOperationjOperand J 

F-4-4-1 

|Sequence |EJECT |Not used; should | 

jsymbol orj jbe blank j 

jnot used j j j 

i-1_i_j 

If the next line of the listing would 
appear at the top of a new page without the 
EJECT instruction, the EJECT instruction 
has no immediate effect. If one or more 
EJECT statements appear after the first 
EJECT, one or more pages are skipped. A 
TITLE instruction followed immediately by 
an EJECT instruction will result in a page 
with a title line and a statement heading 
line. Text following the EJECT instruction 
will begin at the top of the next page. 


SPACE—SPACE LISTING 


The SPACE instruction is used to insert one 
or more blank lines in the listing. The 
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typical form of the SPACE instruction 
statement is as follows: 

r-r-r- 

(Name |Operation|Operand 

j.-f- 4 --- 

(Sequence |SPACE (A decimal value 

j symbol orj j or not used 

jnot used j j 

L_JL-J-- 

A decimal value is used to specify the 
number of blank lines to be inserted in the 
assembly listing. A blank operand causes 
one blank line to be inserted. If this 
value exceeds the number of lines remaining 
on the listing page, the statement will 
have the same effect as an EJECT statement. 


PRINT—PRINT OPTIONAL DATA 


When OFF is specified, GEN and DATA have 
no effect. When NOGEN is specified, DATA 
has no effect for generated constants. 

l 

I 

>( If no PRINT statement is encountered, 

| the following default option is assumed: 

I 

I 

I- 7 -T- 1 

(Name (Operation!Operand ( 

j-4-1--( 

j (PRINT j ON, NODATA,GEN j 

L„-L-JL- I 


For example, if the statement: 


r- 7 —-- 7 -■* 

(Name (Operation!Operand I 

(.-4-4-1 

j (DC (XL256* 00* | 

I_I_._L_I 


The PRINT instruction controls the content 
of the assembly listing. The typical form 
of the PRINT instruction is: 

r - 1 -j- 

(Name |Operation!Operand 

f- f --j-- 

(Sequence |PRINT •One to three 

(symbol or( (operands 

|not used j j 

L-i.- L _ 

One to three of the following operands 
are used: 

ON A listing is printed, 

or 

OFF No listing is printed. 

GEN All statements generated by macro 

instructions are printed, 
or 

NOGEN Statements generated by macro 
instructions are not printed, 
except MNOTE messages which print 
regardless of NOGEN. However, 
the outer macro instruction 
itself will appear in the 
listing. 

DATA Constants are printed out in full 
in the listing, 
or 

NODATA Only the leftmost eight bytes (16 
hexadecimal digits) are printed. 

A program may contain any number of 
PRINT statements. The conditions set by a 
PRINT statement are in effect until another 
PRINT statement is encountered. 

If an operand is omitted, it is assumed 
to be unchanged and continues according to 
its last specification. 


appears in a program, 256 bytes of zeros 
are assembled. If the statement: 

I-7-7-1 

(Name (OperationJOperand | 

i i-i-4--i 

| j (PRINT (DATA | 

j I-J-J.-J 

I 

J is the last PRINT statement to appear 
j before the DC statement, all 256 bytes of 
zeros are printed in the assembly listing. 
However, if there are no previous PRINT 
statements, or: 

I-7-7-1 

(Name (Operation(Operand | 

j.- i - i -1 

| jPRINT jNODATA j 

I- X -jL-1 

is the last PRINT statement to appear 
before the DC statement, only eight bytes 
of zeros are printed in the assembly 
listing. 


Program Control Instructions 


The program control instructions are used 
to specify the end of an assembly, to set 
the location counter to a value or halfword 
boundary, to insert previously written 
coding in the program, to specify the 
placement of literals in storage, to check 
the sequence of input cards, to indicate 
statement format, and to punch a card. 
Except for the CNOP and COPY instructions, 
none of these assembler instructions 
generate instructions or constants in the 
object program. 
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ICTL—INPUT FORMAT CONTROL 


ISEQ —INPUT SEQUENCE CHECKING 


The ICTL instruction allows the programmer 
to alter the format of the statements in 
his source module. It can only be used to 
control statements that are read from the 
system input file (SYSIPT). It cannot be 
used to control the format of the input 
from the source statement library. 
Statements that are brought in from that 
library (through macro instructions or COPY 
instructions) are always assumed to be in 
the standard format. 


The ICTL statement must precede all 
other statements, and may only be used 
once. Its format is: 


r - T -r-1 

|Name | Operation]Operand | 

I--!-f-.j 

jNot used, j ICTL | 1-3 decimal j 

(must not | (values of the j 

jbe present j jform b,e,c ! 

i_x_ j _j 


Operand b specifies the begin column of 
the source statement. It must always be 
specified, and must be from 1-40, 
inclusive. Operand e specifies the end 
column of the source statement. The end 
column, when specified, must be from 41-80, 
inclusive; when not specified, it is 
assumed to be 71. The column after the end 
column is used to indicate whether the next 
card is a continuation card. Operand c 
specifies the continue column of the source 
statement. The continue column, when 
specified, must be from 2-40 and must be 
greater than b. If the continue column is 
not specified, or if column 80 is specified 
as the end column, the assembler assumes 
that there are no continuation cards, and 
all statements must be contained on a 
single card. The operand forms b,,c and b, 
are invalid. 

If no ICTL statement is used in the 
source program, the assembler assumes that 
1, 71, and 16 are the begin, end, and 
continue columns, respectively. 

The next example designates the begin 
column as column 25. Since the end column 
is not specified, it is assumed to be 
column 71. No continuation cards are 
recognized because the continue column is 
not specified. 

r- t-1- 1 

|Name |Operation]Operand ] 

t - + - f - i 

j jICTL j 25 j 

i_x_x-J 


The ISEQ instruction is used to check the 
sequence of input cards. The typical form 
of the ISEQ instruction statement is as 
follows: 

I 
I 


j 


f - T -T--- 

|Name ] Operation|Operand 

j.- 4 - 1 - - 

|Not used, | ISEQ |Two decimal 

jmust not j lvalues of the 

jbe present j jform 1, r, or 

j j jnot used 

i-j-x- 


The operands 1 and r, respectively, 
specify the leftmost and rightmost columns 
of the field in the input cards to be 
checked. Operand r must be equalto or 
greater than operand 1. Columns to be 
checked must not be between the "begin" and 
"end" columns. 

Sequence checking begins with the first 
card following the ISEQ statement. 
Comparison of adjacent cards makes use of 
the eight-bit internal collating sequence. 
Each card checked must be higher than the 
preceding one. 

An ISJ2Q statement with a blank operand 
terminates the operation. Checking may be 
resumed with another ISEQ statement. 

Sequence checking is only performed on 
statements contained in the source program. 
Statements inserted by the COPY assembler 
instruction or generated by a macro 
instruction are not checked for sequence. 


PUNCH-PUNCH A CARD 


The PUNCH assembler instruction causes the 
data in the operand to be punched intc a 
card. One PUNCH statement produces one 
punched card. As many FUNCH statements may 
be used as are necessary. The typical form 
is: 


r - T - T -1 

| Name |Operation]Operand | 


jSequence jPUNCH jl to 80 characters j 
jsymbol orj jenclosed in j 

jnot used j japostrophes j 

t-J---L-J 

Using character representation, the 
operand is written as a string of up to 80 
characters enclosed in apostrophes. All 
characters, including blank, are valid. 

The position immediately to the right of 
the left apostrophe is regarded as column 
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one of the card to be punched. The 
assembly program does not process the data 
in the operand of a PUNCH statement other 
than causing it to be punched in a card. 

Fcr each apostrophe or ampersand desired in 
the operand, two apostrophes or ampersands 
must be written. The two apostrophes or 
ampersands are reduced to a single 
apostrophe or ampersand. However, they 
ccunt as only cne character in the operand. 

PUNCH statements may occur anywhere 
within a program, except before macro 
definitions. They may occur within a macro 
definition but not between a MEND statement 
and the beginning of the next macro. If a 
PUNCH statement occurs before the first 
control section, the resultant card will 
precede all other cards in the object 
program card deck; otherwise the card will 
be punched in place. No sequence number or 
identification is punched in the card. 


REPRO--REPRODUCE FOLLOWING CARD 


The REPRO assembler instruction causes data 
on the following statement line to be 
punched into a card. The data is not 
processed; it is punched in a card and no 
substitution is performed for variable 
symbols. No sequence number or 
identification is punched in the card. One 
REPRO instruction produces one punched 
card. The REPRO instruction may not appear 
before a macro definition. 


r --j-7- -! 

{Name JOperationJOperand | 

I-- 4 - 4 - 1 

JSequence |ORG |A relocatable ex- | 

jsymbol orj jpression or net used j 

jnot used j J j 

l- X -J_J 

Any symbols in the expression must have 

been previously defined. The unpaired 
relocatable symbol must be defined in the 
same control section in which the ORG 
statement appears. 

The location counter is set to the value 
of the expression in the operand. If the 
operand is omitted, the location counter is 
set to a location that is one byte higher 
than the maximum location assigned for the 
control section up to this point. 

An ORG statement must not be used to 
specify a location below the beginning of 
the control section in which it appears. 

The effect would be to give the location 
counter a large value. For example, the 
statement: 


r- 

| Name 

J-- 

[ 


T-T- 

{Operation j Operand 


jORG j *-500 

JL-1- 


1 

I 

i 

I 

J 


is invalid if it appears less than 500 
bytes from the beginning of, the current 
control section. 



REPRO statements that occur before all 
statements composing the first or only 
control section will punch cards which 
precede all cards of the object deck. The 
form is: 

r- t-1-1 

|Name |Operation|Operand { 

r- 4 -f- -i 

{Sequence |REPRO {Not used, should J 

jsymbol orj jnot be present j 

jnot used j j j 


The line to be reproduced may contain 
any combination of up to 80 characters. 
Characters may be entered starting in 
column 1 and continue through column 80 of 
the line. Column 1 of the line corresponds 
to column 1 of the card to be punched. 


If it is desired to reset the location 
counter to the next available location in 
the current control section, the following 
statement would be used: 


{Name {OperationjOperand j 



L_L_I_^_J 


If previous CRG statements have reduced 
the location counter for the purpose of 
redefining a portion of the current control 
section, an ORG statement with an emitted 
operand can then be used to terminate the 
effects of such statements and restore the 
location counter to its highest setting. 


LTORG--BEGIN LITERAL PCCL 

ORG--SET LOCATION COUNTER 

The LTORG instruction causes all literals 
since the previous LTORG or beginning of 

The ORG instruction is used to alter the the program to be assembled at appropriate 

setting of the location counter for the boundaries starting at the first doubleword 

current control section. The typical form boundary following the LTCRG statement. If 

of the ORG instruction statement is: no literals follow the LTORG statement. 
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alignment of the next instruction will 
occur. Bytes skipped are not zeroed. The 
typical form of the LTORG instruction 
statement isi 


r - T - ——T- 

|Name |Operation!Operand 

F-4-f- 

|Any (LTORG |Not used, should 

jsymbol j |not be present 

jor not | | 

jused j j 

i-x-x- 


The symbol represents the address of the 
first byte of the literal pool. It has a 
length attribute of one. 

The literal pool is organized into four 
segments within which the literals are 
stored in order of appearance, dependent on 
the divisibility properties of their object 
lengths (dup factor times total explicit or 
implied length). The first segment 
contains all literals whose object length 
is a multiple of eight. Those remaining 
literals with lengths divisible by four are 
stored in the second segment. The third 
segment holds the remaining even length 
literals. Any literals left over have odd 
lengths and are stored in the fourth 
segment. 

Since each literal pool begins at a 
doubleword boundary, this guarantees that 
all segment one literals are doubleword, 
segment two fullword, and segment three 
halfword aligned, with no space wasted 
except, possibly, at the pool origin. 

Literals from the following statement 
are in the pool, in the segments indicated 
by the circled numbers. 


© 


MVC 

A (6) ,=3H ' 1 * 


AD 

2,=D ' 1 ' 

© 

LM 

3,5 ,=3F*1 * 

IC 

2 ,=XL1 1 1 * 

© 

AC 

2 ,=E* 2' 


Special Addressing Consideration 


Any literals used after the the last LTORG 
statement in a program are placed at the 
end of the first control section. If there 
are no LTORG statements in a program, all 
literals used in the program are placed at 
the end of the first control section. In 
these circumstances the programmer must 
ensure that the first control section is 
always addressable. This means that the 
base address register for the first control 
section should not be changed through usage 


in subsequent control sections. If the 
programmer does not wish to reserve a 
register for this purpose, he may place a 
LTORG statement at the end of each control 
section, thereby ensuring that all literals 
appearing in that section are addressable. 


CNOP—CONDITIONAL NO OPERATION 


The CNOP instruction allows the programmer 
to align an instruction at a specific word 
boundary. If any bytes roust be skipped in 
order to align the instruction properly, 
the assembler insures an unbroken 
instruction flow by generating no-operation 
instructions. This facility is useful in 
creating calling sequences consisting of a 
linkage to a subroutine followed by 
parameters such as channel command words 
(CCW) . 

The CNOP instruction insures the 
alignment of the location counter setting 
to a halfword, word, or doubleword 
boundary. If the location counter is 
already properly aligned, the CNOP 
instruction has no effect. If the 
specified alignment requires the location 
counter to be incremented, one to three 
no-operation instructions are generated, 
each of which uses two bytes. 

The typical form of the CNOP instruction 
statement is as follows: 

C-T-T-1 

|Name (Operation|Operand J 

I-- r4 - 4 -^ 

(Sequence (CNOP (Two absolute | 

(symbol orj (expressions of ( 

jnot used | (the form b,w j 

L-J-J-J 


Any symbols used in the expressions in 
the operand field must have been previously 
defined. 

Operand b specifies at which byte in a 
word or doubleword the location counter is 
to be set; b can be 0, 2, 4, or 6. Operand 
w specifies whether byte b is in a word 

(w=4) or doubleword (w=8) . The following 
pairs of b and w are valid: 

b,w Specifies 

0,4 Beginning of a word 

2,4 Middle of a word 

0,8 Beginning of a doubleword 

2.8 Second halfword of a doubleword 

4.8 Middle (third halfword) of a 
doubleword 

6.8 Fourth halfword of a doubleword 
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r-1 

| Doubleword j 

j.- T -H 

j Word j Word j 

j.- 1 -f- T -^ 

| Halfword j Halfword j Halfword J Halfword j 

I I I I I I I I I 

| Byte | Byte J Byte |Byte | Byte J Byte | Byte |Byte J 

j.-X-X-X-X-X-X-X- \ 

I ! 

10,4 2,4 0,4 2,4 | 

|0,8 2,8 4,8 6,8 | 

L- J 

Figure 14. CNOP Alignment 



Figure 14 shows the position in a double 
word that each of these pairs specifies. 
Note that both 0,4 and 2,4 specify two 
locations in a doubleword. 

Assume that the location counter is 
currently aligned at a doubleword boundary. 
Then the CNOP instruction in this sequence: 


r- t --- t - 

|Name |Operation|Operand 

{■- i -f- 

j jCNOP j0,8 

j j BALR |2, 14 

i-x-—x- 




i 

I 


j 


has no effect. However, this sequence: 


r---r-r- 

| Name |Operation|Operand 

j.-1-1- 

j jCNOP J 6,8 

j j BALR 12,14 

t-x-x- 


I 

i 

I 

I 


causes three branch-on-*conditions 
(no-operations) to be generated, thus 
aligning the BALR instruction at the last 
halfword in a doubleword as follows: 


r- t-t- 1 

| Name |Operation|Operand J 

f- i 

10,0 | 

10,0 | 

10,0 | 

I 2,14 | 

.x-j 


After the BALR instruction is generated, 
the location counter is at a doubleword 
boundary, thereby insuring an unbroken 
instruction flow. 


j BCR 
| BCR 
j BCR 
JBALR 


N ote : If the location counter is on an 

odd-numbered byte-boundary when a CNOP 
instruction is encountered, normal 
alignment occurs before the CNOP is 
processed. 


C0PY--C0PY PREDEFINED SOURCE CODING 


The COPY instruction obtains source 
language coding from a system library and 
includes it in the program currently being 
assembled. Under the DCS D Assembler, 10K 
Variant, the coding to be included is 
obtained from the system source statement 
library. Under the DOS D Assembler, 14K 
Variant, and the CCS F Assembler, the 
coding to be included is obtained from the 
private source statement library, if one is 
assigned, or from the system source 
library, in that order of precedence. 

Under the TOS D Assembler, 10K and 14K 
Variants, the coding to be included is 
obtained from the standard private library. 
The form of the COPY instruction statement 
is as follows: 

r- T - T -•, 

{Name | Operation!Operand | 

I-- 4 - + -1 

|Not used, J COPY |Cne symbol | 

jmust not | j j 

jbe present j j j 

i-x_x-j 

The operand is a symbol that identifies 
the section of coding to be copied. The 
symbol must not be the same as the mnemonic 
operation code of a macro definition in the 
source statement library. 

The assembler inserts the requested 
coding immediately after the COFY statement 
is encountered. The requested coding may 
not contain another CCPY statement. 

If identical COFY statements are 
encountered, the coding they request is 
brought into the program each time. 

Copied text is always in the normal 
format and is not governed by ICTL usage. 
See "Copy Statements" in Section 7 for 
further information. The procedure for 
placing source language coding in the 
system library is described in the System 


/f 'v 
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Control and System Service Programs 
publication listed in the "Preface." 


END—END ASSEMBLY 


The END instruction terminates the assembly 
of a program. It may also designate a 
point in the program or in a separately 
assembled program to which control may be 
transferred after the program is loaded. 

The END instruction must always be the last 
statement in the source program. 

The typical form of the END instruction 
statement is as follows: 

r-r- t-1 

| Name | Operation! Ope rand j 

h- f -f-4 

|A sequence | END )A relocatable | 

|symbol or j jexpression or j 

|not present! jnot present f 

t--L-i._j 


The operand specifies the point to which 
control may be transferred when loading is 
complete. For example: 


Name 

JOperation | Operand 

J. A 

NAME 

|CSECT 

T 

i 

AREA 

|DS 

15 OF 

EEGIN 

| EALR 

|2,0 


j USING 

1 * 

1 m 

1* #2 

1 


1 * 

I* 

j END 

I 

1 

jBEGIN 


_L__ 



Note: If macro instructions from the 
Source Statement Library are included in an 
assembly, errors detected during macro 
editing will be flagged after the END 
statement. The error messages do not 
follow the macro instructions, because the 
source statements are not available to the 
assembler during macro editing. Errors 
detected while editing Programmer Macros 
will be flagged inline. 
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Part 3—Conditional Assembly and Macro Facilities in the 

Assembler Language 


Organization of this Part of the Publication 


Section 6 gives an introduction to the conditional assembly and macro 
facilities in the assembler language. 

Sections 7 and 8 describe the basic rules for preparing macro 
definitions and for writing macro instructions. 

Section 9 describes the rules for writing conditional assembly 
instructions. 

Section 10 describes additional features including rules for de¬ 
fining global SET symbols, preparing keyword and mixed-mode macro 
definitions, and writing keyword and mixed-mode macro instructions. 

Appendix G contains a reference summary of the complete macro 
facilities. 

Examples of the use of the features of the language appear through¬ 
out the remainder of the publication. These examples illustrate the 
use of particular features. However, they are not meant to show the 
full versatility of these features. 
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Section 6. Introduction to the Conditional Assembly and 

Macro Facilities 


The DOS/TOS conditional assembly and macro 
facilities are part of the DOS/TOS 
assembler language. 

Conditional assembly allows one to 
specify assembler language statements which 
may or may not be assembled, depending upon 
conditions evaluated at assembly time. 
Conditional asseipbly statements are used to 
define, set, change, and test values during 
the course of the assembly itself. 

The conditional assembly instructions 
may be used to vary the sequence of 
statements generated for each occurrence of 
a macro instruction. Conditional assembly 
instructions may also be used outside macro 
definitions, i.e., among the assembler 
language statements in the program. 

The macro facilities provide the 
programmer with a convenient way of 
generating desired sequences of machine or 
certain assembler instructions many times 
in one or more programs. This is 
accomplished by writing a macro definition. 

This macro definition is written only 
once, and a single statement, a macro 
instruction statement, is written each time 
a programmer wants to generate the desired 
sequence of statements. 

The macro facilities simplify the coding 
of programs, reduce the chance of 
programming errors, and ensure that 
standard sequences of statements are used 
to accomplish desired functions. 


The Macro Instruction Statement 


A macro instruction statement (also called 
a macro instruction) is a source program 
statement used to provide information for 
generating machine and assembler 
instructions from a macro definition. The 
generated instructions are source 
statements which are then processed by the 
assembler program. 

Three types of macro instructions may be 
written. Each type has a different form of 
operand. They are: 

1. Positional (Sections 7 and 8) . 

Keyword (Section 10) . 


3. Mixed-mode (Section 10). 

Positional macro instruction operands 
are written in a fixed order. 

Keyword macro instruction operands can 
be written in any order. 

Mixed-mode macro instruction operands 
are a combination of both positional and 
keyword operands. That is, certain operand 
entries (positional) must be written in a 
fixed order; other operand entries 
(keyword) can be specified in any order. 


The Macro Definition 


Before a macro instruction can be 
assembled, a macro definition must be 
available to the assembler. 

A macro definition is a set of 
statements that provide the assembler with: 

1. The name entry, mnemonic operation 
code, and the form of the macro 
instruction operand, and 

2. The sequence of statements the 
assembler uses when the macro 
instruction appears in the source 
program. 

Every macro definition consists of a 
macro definition header statement, a macro 
instruction prototype statement, a sequence 
of model statements, COPY statements, 

MEXIT, MNOTE, or conditional assembly 
instructions, and a macro definition 
trailer statement. 

The macro definition header and trailer 
statements denote the beginning and end, 
respectively, of a macro definition. 

The macro instruction prototype 
statement specifies the name entry, 
mnemonic operation code, and the type of 
the macro instruction operand. 

The model statements contained in a 
macro definition may be used by the 
assembler to generate machine instructions 
and certain assembler instructions that 
replace each occurrence of the macro 
instruction. 

The COPY statements may be used to copy 
model statements, MEXIT instructions, MNOTE 


2 . 
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instructions, and conditional assembly 
instructions from a source statement 
library into a macro definition. 

The MEXIT instruction can be used to 
terminate processing of a macro definition. 

The MNOTE instruction can be used to 
generate a message. 

The conditional assembly instructions 
may be used to vary the sequence of 
statements generated for each occurrence of 
a macro instruction. Conditional assembly 
instructions may also be used outside macro 
definitions, i.e., among the assembler 
language statements in the program. 

If a macro definition is inline with an 
assembly, it is called a programmer macro. 


Source Statement Libraries 


The same macro definition may be made 
available to more than one source program 
by placing the macro definition in the 
system source statement library. The macro 
definition then becomes a system macro. 

This system library is a collection of 
macro definitions that can be used by all 
the assembler language programs in an 
installation. Once a macro definition has 
been placed on the system souice statement 
library it may be used by writing a 
corresponding macro instruction in a source 
program. Macro definitions must be in the 
system source statement library under the 
same name as the prototype. The procedure 
for placing macro definitions in the system 
source statement library is described in 
the System Control and System Service 
Programs publication listed in the 
"Preface." 

System macro definitions provided by IBM 
are described in the Supervisor and 
Input/Output Macros publication, also 
listed in the "Preface." 

A macro definition may be made available 
to a specific assembly by placing the macro 
definition in a private source statement 
library. If the private source statement 
library is assigned at the time of 
assembly, the macro definitions in the 
private source statement library may be 
used by writing a corresponding macro 
instruction in a source program. The macro 
definitions in the private source statement 
library must be under the same name as the 
prototype. The procedure for placing macro 
definitions in the private source statement 
library is described in the System Control 
and System Service Programs publication 
listed in the "Preface." 


Editing errors in user-supplied macro 
definitions are found at the time the macro 
is read from the source statement library, 
i.e., after the END card. To determine 
where these errors are, it is necessary to 
punch all such macros, including inner 
macros, and insert them then in the source 
program as programmer macros. To aid in 
debugging it is advisable to run all macros 
as programmer macros before incorporating 
them in a source statement library. 


Varying the Generated Statements 


Each time a macro instruction appears in 
the source program, it is replaced by the 
same sequence of assembler language 
statements. Conditional assembly 
instructions, however, may be used to vary 
the number and format of the generated 
statements. 


VARIABLE SYMBOLS 


A variable symbol is a type of symbol that 
is assigned various values by either the 
programmer or the assembler. Thus, 
variable symbols allow different values to 
be assigned to one symbol. When the 
assembler uses a macro definition to 
determine what statements are to replace a 
macro instruction, variable symbols in the 
model statements are replaced with the 
current values assigned to them. 

A variable symbol is written as an 
ampersand followed by from one to seven 
letters and/or digits, the first of which 
must be a letter. 


Types of Variable Symbols 


There are three types of variable symbols: 
symbolic parameters, system variable 
symbols, and SET symbols. The SET symbols 
are further broken down into SETA symbols, 
SETB symbols, and SETC symbols. The three 
types of variable symbols differ in how 
they are assigned values. 


Assigning Values to Variable Symbols 


Symbolic parameters are assigned values by 
the programmer each time he writes a macro 
instruction. 
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System variable symbols, except 
&SYSPARM. are assianed values by the 
assembler each time it processes a macro 
instruction. 

SET symbols are assigned values by the 
programmer by means of conditional assembly 
instructions. 


definitions. All SET symbols used for this 
purpose must be defined as global SET 
symbols. All other SET symbols must be 
defined by the programmer as local SET 
symbols. Local SET symbols and the other 
variable symbols (that is, symbolic 
parameters and system variable symbols) are 
local variable symbols. Global SET symbols 
are global variable symbols. 


Global SET Symbols 


The values assigned to SET symbols in one 
macro definition may be used in other macro 
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Section 7. How to Prepare Macro Definitions 


A macro definition consists of: 

1. A macro definition header statement. 

2. A macro instruction prototype 
statement. 

3. Zero or more model statements, COPY 
statements, MEXIT, MNOTE, or 
conditional assembly instructions. 

4. A macro definition trailer statement. 

Except for MEXIT, MNOTE, and conditional 
assembly instructions, this section of the 
publication describes the statements that 
may be used to prepare macro definitions. 
Conditional assembly instructions are 
described in Section 9. MEXIT and MNOTE 
instructions are described in Section 10. 


must be the last statement in every macro 
definition. The form of this statement is: 

r- 7 -t- 1 

|Name jOperation|Operand | 

f-4-4-1 

|Sequence {MEND |Not used, must | 

{symbol orj jnot be present j 

jnot used j | j 

i-a- jl -j 

This statement also tells the assembler 
to terminate processing of a macro 
definition. Processing can be terminated 
at some other point in a macro definition 
through the MEXIT instruction. 

Macro Instruction Prototype 


Macro definitions in a source program 
must appear before all PUNCH and REPRO 
statements which appear in the main 
program. Specifically, only the listing 
control instructions (EJECT, PRINT, SPACE, 
and TITLE), ICTL and ISEQ instructions, and 
comments statements may occur before the 
macro definitions. All but the ICTL 
instruction may appear between macro 
definitions if there is more than one 
definition in the source program. 

Note : A macro definition cannot appear 
within a macro definition. 


MACRO-Macro Definition Header 


The macro definition header statement 
denotes the beginning of a macro 
definition. It must be the first statement 
in every macro definition. The form of 
this statement is: 

r - 1 - 1 -•, 

|Name J Operation{Operand j 

j.-1-j.-.j 

|Not used, | MACRO |Not used, must J 

jmust not j |not be present f 

jbe present j j j 

i-i- L -J 


MEND-Macro Definition Trailer 


The macro-definition trailer statement 
denotes the end of a macro definition. It 


The macro instruction prototype statement 
(also called the prototype statement) 
specifies the name entry, mnemonic 
operation code, and the form of all macro 
instructions that refer to the macro 
definition. It must be the second 
statement of every macro definition. The 
typical form of this statement is: 

r- t-T-1 

{Name {Operation|Operand J 

f-4-4-^ 

{A symbolicJA symbol |Zero to 100 (200 | 

{parameter j {for F assembler) j 

jor not j {symbolic parameters,! 

{used j {separated by commas j 

L_-L_J._J 

The symbolic parameters are used in the 
macro definition to represent the name 
entry and operands of the corresponding 
macro instruction. A description of 
symbolic parameters appears following 
"Mcdel Statements." 

The name entry of the prototype 
statement may be unused or it may contain a 
symbolic parameter. 

The symbol in the operation entry is the 
mnemonic operation code that must appear in 
all macro instructions that refer to this 
macro definition. The mnemonic operation 
code must not be the same as the mnemonic 
operation code of another macro definition 
in the source program or of a machine 
instruction or assembler instruction. 

The operand may contain zero to 100 (200 
for F assembler) symbolic parameters 
separated by commas. 
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The following is a prototype statement. 


Page of GC24 - 3414-9 
Revised Nov. 31, 1972 
By TNL: GN33-8157 


r - 

| Name 
|.- 

|SNAME 


•T-T- 

J Operation j Operand 

+-+- 

{MOVE |STO,SFROM 

.x_x_ 


1 

! 

I 

j 


Alternate Statement Form 


The prototype statement may be written in a 
form different from that used for machine 
or assembler instructions. The normal form 
is described in Part 1 of this publication. 
The alternate form described here allows 
the programmer to write an operand on each 
line, and allows the interspersing of 
operands and comments in the statement. 


In the alternate form, as in the normal 
form, the name and operation entries must 
appear on the first line of the statement, 
and at least one blank must follow the 
operation entry on that line. Both types 
of statement forms may be used in the same 
prototype statement. 


Name 

NAME1 


Oper¬ 

ation 


Operand 


Comments 


H 

xj 


0P1 

0P2 


OPERAND1,0PERAND2,OPERAN j 
D3 THE NORMAL FORM I 


-H 

x| 

X| 

X| 


NAME 2 


OPERAND1, THIS IS THE AL j 
0PERAND2,0PERAND3 TERNA j 
TE STATEMENT j 

FORM | 


—I 

X| 

X( 

X! 


NAME3 


0P3 


OPERAND1, THIS IS A COMBj 
0PERAND2,0PERAND3,OPERAN| 
D4,OPERAND5 INATION OF | 
BOTH STATEMENT FORMATS j 
-x. 


Model Statements 


Model statements are the macro definition 
statements from which the desired sequences 
of machine instructions and certain 
assembler instructions are generated. Zero 
or more model statements may follow the 
prototype statement. A model statement 
consists of one to four entries. They are, 
from left to right, the name, operation, 
operand, and comments entries. 


The rules for using the alternate 
statement form are: 

1. If an operand is followed by a comma 
and a blank, and the column after the 
end column contains a nonblank 
character, the operand entry may be 
continued on the next line starting in 
the continue column. More than one 
operand may appear on the same line. 


The name entry may be unused, or it may 
contain an ordinary symbol, a sequence 
symbol or a variable symbol, depending on 
the particular statement. (Neither * nor 
. * may be substituted in the begin column 
of a model statement.) 

The operation entry may contain any 
machine, assembler, or macro instruction 
code, except COPY, END, ICTL, ISEQ, and 
PRINT; or it may contain a variable symbol. 


2. Comments may appear after the blank 
that indicated the end of an operand, 
up to and including the end column. 

3. If the next line starts after the 
continue column, the information 
entered on that line is considered to 
be comments, and the operand field is 
considered terminated. Any subsequent 
continuation lines are considered to 
contain only comments. 


Note : A prototype statement may be written 
on as many continuation lines as is 
necessary to contain 100 (200 for F 
assembler) operands and associated 
comments. 

The following examples illustrate: (1) 
the normal statement form, (2) the 
alternate statement form, and (3) the 
combination of both statement forms. 


Variable symbols may not be used to 
generate the following mnemonic operation 
codes: COPY, END, ICTL, CSECT, DSECT, 

PRINT, REPRO, START, MACRO, MEND, MEXIT, 

LCLA, LCLB, LCLC, GBLA, GBLB, GBLC, SETA, 
SETB, SETC, AIF, AIFB, AGO, AGOB, ANOP, 
ACTR, or macro instructions. 

Variable symbols may not be used in the 
name entry of the following instructions: 
ACTR, COPY, END, ICTL, or ISEQ. 

Variable symbols may not be used in the 
operand entry of the following 
instructions: COPY, ICTL, or ISEQ. 

Variable symbols may be used outside of 
macro definitions to generate mnemonic 
operation codes with the preceding 
restrictions. 

Although COPY statements may not be used 
as model statements, they may be part of a 
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macro definition. The use of COPY 
statements is described under "COPY 
Statements." 

The operand entry may contain ordinary 
symbols or variable symbols. After 
substitution, the operand must not be 
greater than 127 (255 for F assembler) 
characters. Model statement fields must 
follow the rules for paired apostrophes, 
ampersands, and blanks, as macro 
instruction operands. (See "Macro 
Instruction Operands" in Section 8.) 
Sequence symbols must appear in the operand 
entry of AGO and AIF instructions. 

The comments entry may contain any 
combination of characters. Substitution by 
the use of variable symbols is not allowed. 

If a REPRO statement is used as a model 
statement, it must be explicitly written in 
the operation entry. It may not be 
generated as a result of replacing a 
variable symbol by its value. Also, the 
line following it may not contain variable 
symbols. Substituted statements may not 
have blanks in any fields except between 
paired apostrophes. They may not have 
leading blanks in the name or operand 
fields. 


Symbolic Parameters 


A symbolic parameter is a type of variable 
symbol consisting of an ampersand followed 
by one to seven letters and/or numbers, the 
first of which must be a letter. Symbolic 
parameters appear in prototype and model 
statements. They are assigned values by 
the programmer when he writes a macro 
instruction. The programmer may vary 
statements that are generated for each 
occurrence of a macro instruction by 
varying the values assigned to symbolic 
parameters. 

The programmer should not use 5SYS as 
the first four characters of a symbolic 
parameter. 

The following are valid symbolic 
parameters: 

6READER SL00P2 
SA23456 SN 
SX4F2 SS4 

The following are invalid symbolic 
parameters: 

CARDAREA (first character is not an 

ampersand) 

S256B (first character after 

ampersand is not a letter) 


SAREA2456 
SBCD (34) 

SIN AREA 


(more than seven characters 
after the ampersand) 

(contains a special 
character other than initial 
ampersand) 

(contains a special 
character, i.e., blank, 
other than initial 
ampersand) 


The following is an example of a macro 
definition. Note that the symbolic 
parameters in the model statements appear 
in the prototype statement. 

r - T - T --j 

j Name |Operation|Operand | 

j.- + -+-^ 

Header j j MACRO j | 


Prototype|SNAME j MOVE 

|STO,SFROM 

Model 

|SNAME|ST 

|2,SAVE 

Model 

I |L 

j2,SFROM 

Model 

1 1ST 

j 2,STO 

Model 

1 (L 

j 2,SAVE 

Trailer 

| j MEND 

t — x_ 

1 

. _x _ 


Symbolic parameters in model statements 
are replaced by the characters of the macro 
instruction operand that correspond to the 
symbolic parameters. 

In the following example the characters 
HERE, FIELDA, and FIELDB of the MOVE macro 
instruction correspond to the symbolic 
parameters SNAME, STO, and SFROM, 
respectively, of the MOVE prototype 
statement. 


r - T - T -1 

j Name |Operation|Operand | 

j.-+-+-^ 

jHERE j MOVE jFIELDA,FIELDB j 

L-J._._X-J 

Any occurrence of the symbolic 
parameters SNAME, STO, and SFROM in a model 
statement will be replaced by the 
characters HERE, FIELDA, and FIELDB, 
respectively. If the preceding macro 
instruction was used in a source program, 
the following assembler language statements 
would be generated: 


r- T - T -•, 

|Name |Operation|Operand | 



- T - 


HERE 

ST 

j 2,SAVE 


|L 

j2,FIELDB 


ST 

j2,FIELDA 


|L 

j2,SAVE 


._x_ 

-.X - - 


The following example illustrates 
another use of the MOVE macro instruction 
using operands different than those that 
appear in the preceding example. 



"V 
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r — T- t —- 

| Name | Operation j Operand 

LX X 

r t 

Macro jLABELjMOVE 

l.I . 

iIN,OUT 

r 1 

Generated | LABEL|ST 
Generated! |L 

Generated j j ST 

Generated j j L 

l __x___ 

|2,SAVE 
j 2,OUT 

J 2, IN 
j 2,SAVE 

j_ 


-I 

! 

•4 


j 


If a symbolic parameter appears in the 
comments field of a model statement, it is 
not replaced by the corresponding 
characters of the macro instruction. 


Concatenating Symbolic Parameters with 
Other Characters or Other Symbolic 
Parameters 


preceded by other characters (i.e., ST and 
L) in the model statements, the character 
that corresponds to STY (i.e., D) is 
concatenated with the other characters to 
form the operation fields of the generated 
statements. 

j The symbolic parameters SP, STO, and 
SFROM are used in two of the model 
statements to vary part of the operand 
fields of the corresponding generated 
statements. The characters FIELD, A, and B 
correspond to the symbolic parameters SP, 
STO, and 6FROM, respectively. Since SP is 
followed by SFROM in the second model 
statement, the characters that correspond 
to them (i.e., FIELD and B) are 
concatenated to form part of the operand 
field of the second generated statement. 
Similarly, FIELD and A are concatenated to 
form part of the operand field of the third 
generated statement. 




Concatenation is the process of linking or 
joining together in a sequence, with a 
specified order. To concatenate is to join 
together in a specified order. 

If a symbolic parameter in a model 
statement is immediately preceded or 
followed by other characters or another 
symbolic parameter, the characters that 
correspond to the symbolic parameter are 
combined, in the order given, in the 
generated statement, with the other 
characters or the characters that 
correspond to the other symbolic parameter. 
This process is called concatenation. 

The macro definition, macro instruction, 
and generated statements in the following 
example illustrate these rules. 


If the programmer wishes to concatenate 
a symbolic parameter with a letter, digit, 
left parenthesis, or period following the 
symbolic parameter he must immediately 
follow the symbolic parameter with a 
period. A period is optional if the 
symbolic parameter is to be concatenated 
with another symbolic parameter, or a 
special character other than a left 
parenthesis or another period that follows 
it. 

If a symbolic parameter is immediately 
followed by a period, then the symbolic 
parameter and the period are replaced by 
the characters that correspond to the 
symbolic parameter. A period that 
immediately follows a symbolic parameter 
does not appear in the generated statement. 


r - r -t- 1 The following macro definition, macro 

jName jOperation!Operand j instruction, and generated statements 


1- 

- +- 

—+- 

— 

-4 

illustrate these rules. 



Header j 

JMACRO 

1 


1 





Prototype J 6NAMEJ MOVE 

J STY,SP,STO,SFROMJ 

r ~ 

T 

T - ~ ~ 

“i 

Model I 

SNAMEJ STSTY 

!2,SAVEAREA 


1 

J Name 

JOperation|Operand 

i 

Model | 

JLSTY 

j 2,SPSFROM 


1 

4- 

•+" - — 

~+ - 

-4 

Model J 

j STSTY 

J 2,SPSTO 


1 

Header J 

MACRO 

1 

1 

Model J 

|LSTY 

j 2,SAVEAREA 


1 

1 Prototype{SNAME JMOVE 

|SP,SS,SRI,6R2 

1 

Trailer j 

Jmend 

1 


1 

Model JSNAME!ST 

|SRI,6S. (6R2) 

1 

I- 

- + - 

-4-- 

— 

■4 

Model J 

|L 

j SRI,6P.B 

I 

Macro j 

HERE j MOVE 

JD,FIELD,A,B 


! 

Model J 

ST 

|SRI,SP.A 

1 

4 



— 

-4 

Model | 

|L 

J SRI ,6S. (SR2) 

1 

Generated| 

HERE j STD 

j 2,SAVEAREA 


1 

Trailer j 

j MEND 

1 

1 

Generated j 

!LD 

j 2,FIELDB 


I 

4 - 

-+- 

__ + - 

-4 

Generated j 

j STD 

j 2,FIELDA 


1 

Macro j HERE 

J MOVE 

{FIELD,SAVE,2,4 

I 

Generated J 

JLD 

(2,SAVEAREA 


1 

4 - 

-+- 


-4 

L 

-X^.- 

X -- 

— 

.j 

Generated|HERE 

ST 

! 2 , SAVE (4) 

1 






Generated j 

|L 

j 2,FIELDB 

1 

The symbolic parameter STY is used 

in 


Generated! 

j ST 

j 2,FIELDA 

1 

each of the four model 

statements to vary 


Generated j 

|L 

J 2, SAVE (4) 

1 

the mnemonic operation 

code of each of 

the 

L 

.X 


_j 

generated 

statements. 

The character D 

in 






the macro 

instruction corresponds to 



The symbolic parameter SP is used in the 

symbolic parameter STY. 

Since STY is 



second and third model 

statements to vary 
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part of the operand field of each of the 
corresponding generated statements. The 
characters FIELD of the macro instruction 
correspond to SP. Since £P is to be 
concatenated with a letter (i.e., B and A) 
in each of the statements, a period 
immediately follows 6P in each of the model 
statements. The period does not appear in 
the generated statements. 

Similarly, symbolic parameter SS is used 
in the first and fourth model statements to 
vary the operand fields of the 
corresponding generated statements. 6S is 
followed by a period in each of the model 
statements, because it is to be 
concatenated with a left parenthesis. The 
period does not appear in the generated 
statements. 


Comments Statements 


A model statement may be a comments 
statement. A comments statement consists 
of an asterisk in the begin column, 
followed by comments. The comments 
statement is used by the assembler to 
generate an assembler language comments 
statement, just as other model statements 
are used by the assembler to generate 
assembler language statements. 

The programmer may also write comments 
statements in a macro definition which are 
not to be generated. These statements must 
have a period in the begin column, 
immediately followed by an asterisk and the 
comments. 

Comments statements are the only model 
statements which may be interspersed with 
the definitions of local and global SET 
symbols• 

The first statement in the following 
example will be used by the assembler to 
generate a comments statement; the second 
statement will not. 

r - T -T-T 

|Name J Operation j Operand | 

j.-x-x-^ 

j* THIS STATEMENT WILL BE GENERATED j 

j.* THIS ONE WILL NOT BE GENERATED j 

L---J 


The use of variable symbols for 
substitution in comments statements is not 
allowed. The * or .* of a comment 
statement, therefore, cannot be created by 
substitution for a variable symbol. 


COPY Statements 


A COPY statement is not a model statement. 
COPY statements may be used to copy model 
statements and MEXIT, MNOTE, and 
conditional assembly instructions into a 
macro definition from a system library, 
just as they may be used outside macro 
definitions to copy source statements into 
an assembler language program. Under the 
DOS D Assembler, 10K Variant, the coding to 
be included is obtained from the system 
source statement library. Under the DOS D 
Assembler, 14K Variant, and the DOS F 
Assembler, the coding to be included is 
obtained from the private source statement 
library, if one is assigned, or from the 
system source library, in that order of 
precedence. Under the TOS D Assembler, 10K 
and 14K Variants, the coding to be included 
is obtained from the standard private 
library. 

The form of this statement is: 


Name 

"T* 

I 

-X- 

Operation|Operand 
r 

Not used. 

T 

1 

COPY 

T 

|A symbol 

must not 
be present 

1 

1 

-X. 


1 

I 

x _ 


The symbol in the operand entry 
identifies the section of coding to be 
copied. The symbol must not be the same as 
the operation mnemonic of a macro 
definition in a source statement library. 
Any statement that may be used in a macro 
definition may be part of the copied 
coding, except MACRO, MEND, COPY, and 
prototype statements. 

Statements copyed into the program must 
obey the restrictions on ordering of 
statements. For example, COPY must be 
between global and local declarations in 
the macro definition or in the main program 
if the copyed text contains global and 
local declarations. 
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Section 8. How to Write Macro Instructions 


The typical form of a macro instruction is: 

r - T - T -1 

|Name |Operation|Operand j 

^ - + - + - * 

|A symbol, (Mnemonic (Zero to 100 (200 f 

jsequence joperation!for F assembler) f 
jsymbol, orjcode joperands, separated j 

jnot used | |by commas j 

L-A-X—---J 

The name entry of the macro instruction 
may contain a symbol. The symbol will not 
be defined in the generation process unless 
a symbolic parameter appears in the name 
entry of the prototype and the same 
parameter appears in the name entry of a 
generated model statement. 

The operation entry contains the 
mnemonic operation code of the macro 
instruction. The mnemonic operation code 
must be the same as the mnemonic operation 
code of a macro definition in the source 
program or in a source statement library. 

The macro definition with the same 
mnemonic operation code is used by the 
assembler to process the macro instruction. 
Under the DOS D Assembler, 10K Variant, the 
macro definition is obtained from an inline 
programmer macro definition or from the 
system source statement library, in that 
order of precedence. Under the DOS D 
Assembler, 14K Variant, and the DOS F 
Assembler, the macro definition is obtained 
from an inline programmer macro definition, 
a private source statement library, if one 
is assigned, or the system source statement 
library, in that order of precedence. 

Under the TOS D Assembler, 10K and 14K 
Variants, the macro definition is obtained 
from an inline programmer macro definition 
or from the standard private library, in 
that order of precedence. 

The placement and order of the operands 
in the macro instruction may be determined 
by the placement and order of the symbolic 
parameters in the operand entry of the 
prototype statement. 


Macro Instruction Operands 


Any combination of up to 127 (255 for 
assembler F) characters may be used as a 
macro instruction operand provided that the 
following rules concerning apostrophes, 
parentheses, equal signs, ampersands, 
commas, and blanks are observed. 


Paired Apostrophes . An operand may contain 
one or more sequences of characters, each 
of which is enclosed within single 
apostrophes. (The sequence of characters 
itself may contain an even number of 
apostrophes.) The single apostrophes, 
which enclose the sequence of characters, 
are called paired apostrophes- 

The first sequence of characters starts 
with the first apostrophe in the operand. 
Subsequent character sequences start with 
the first apostrophe after the apostrophe 
that ends the previous sequence of 
characters. 

In the following example; there are two 
sequences of characters enclosed within 
single apostrophes. Therefore, there are 
two sets of paired apostrophes: the first 
and fourth apostrophes, and the fifth and 
sixth apostrophes. 

'A''B'C'D' 

An apostrophe (not within paired 
apostrophes) , immediately followed by a 
letter, and immediately preceded by the 
letter L (when L is preceded by any special 
character other than an ampersand) , is not 
considered in determining paired 
apostrophes. For instance, the apostrophe 
in the following example is not considered. 

L*SYMBOL 

*AL*SYMBOL* is an invalid operand. 

Paired Parentheses . There must be an equal 
number of left and right parentheses. The 
nth left parenthesis must appear to the 
left of the nth right parenthesis. 

Paired parentheses are a left 
parenthesis and a following right 
parenthesis without any other parentheses 
intervening. If there is more than one 
pair, each additional pair is determined by 
removing any pairs already recognized and 
reapplying the above rule for paired 
parentheses. For instance, in the 
following example the first and fourth, the 
second and third, and the fifth and sixth 
parentheses are each paired parentheses. 

(A (B) C) D (E) 

A parenthesis that appears between 
paired apostrophes is not considered in 
determining paired parentheses. For 
instance, in the following example the 
middle parenthesis is not considered. 
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<•> •) 

Equal Signs . An equal sign can only occur 
as the first character in an operand or 
between paired apostrophes or paired 
parentheses. The following examples 
illustrate these rules. 


=F * 3 2 * 

' C=D' 

E (F=G) 

Ampersands . Except as noted under "Inner 
Macro Instructions", each sequence of 
consecutive ampersands must be an even 
number of ampersands. The following 
example illustrates this rule. 

SS123SSSS 

Commas ♦ A comma indicates the end of an 
operand, unless it is placed between paired 
apostrophes or paired parentheses. The 
following example illustrates this rule. 

(A,B) C *,' 

Blanks. Except as noted under "Statement 
Form", a blank indicates the end of the 
operand entry, unless it is placed between 
paired apostrophes. The following example 
illustrates this rule. 

•A B C' 


The following are valid macro 
instruction operands: 


SYMBOL 

123 

X*189A' 

* 

L'NAME 
'TEN = 10' 
'COMMA IS ,' 


A+2 

(TO (8) , FROM) 

0 (2,3) 

=F'4096' 

ABSS9 

'PARENTHESIS IS ) ' 
'APOSTROPHE IS'" 


The following are invalid macro 
instruction operands: 


W'NAME 
5A) B 

(15 B) 

'ONE' IS '1' 


(odd number of apostrophes) 
(number of left parentheses 
does not equal number of 
right parentheses) 

(blank not placed between 
paired apostrophes) 

(blank not placed between 
paired apostrophes) 


Statement Form 


If this form is used, a blank does not 
always indicate the end of the operand 
entry. Furthermore, unlike the prototype 
statement, the macro instruction may have 
omitted operands; therefore consecutive 
commas may appear in the operand list, or a 
comma may appear at the end of the list. 


Omitted Operands 


If an operand that appears in the prototype 
statement is omitted from the macro 
instruction, then the comma that would have 
separated it from the next operand must be 
present. If the last operand (s) is omitted 
from a macro instruction, then the comma (s) 
separating the last operand (s) from the 
next previous operand may be omitted. 

The following example shows a macro 
instruction preceded by its corresponding 
prototype statement. The macro instruction 
operands that correspond to the third and 
sixth operands of the prototype statement 
are omitted in this example. 


| Name 

[ - 

I 

I 

L_ 


T-T- 1 

|Operation|Operand | 

+-+--j 

|EXAMPLE J SA,SB,SC,SD,SE,SF | 

j EXAMPLE |17,* + 4,,AREA,FIELD(6) | 

-L-1-J 


If the symbolic parameter that 
corresponds to an omitted operand is used 
in a model statement, a null character 
value (not a blank) replaces the symbolic 
parameter in the generated statement, i.e., 
in effect the symbolic parameter is 
removed. 

For example, the first statement below 
is a model statement that contains the 
symbolic parameter SC. If the operand that 
corresponds to SC was omitted from the 
macro instruction, the second statement 
below would be generated from the model 
statement. 



(f ~'x 

A . > 


Macro instructions may be written using the 
same alternate form that can be used to 
write prototype statements. This alternate 
form is described in Section 7 under the 
subsection "Macro Instruction Prototype". 


Name 

T T - ~ ~ - 

|Operation J Operand 

_ A. ± 


j MVC 

T 

j THERESC.25,THIS 


j MVC 

j THERE25,THIS 


. -L _ 

- X - _ __ 
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Operand Sublists 


An operand of a macro instruction may be a 
sublist. 

Sublists provide the programmer with a 
convenient way to refer to: (1) a 
collection of macro instruction operands as 
a single operand, or (2) a single operand 
in a collection of operands. 
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A sublist consists of one or irore 
operands (subcperands) separated by commas 
and enclosed in paired parentheses. The 
entire sublist, including the parentheses, 
is considered to be one macro instruction 
operand. 


A suboperand is always treated as a 
character string. It is not possible to 
pass a suboperand containing a sublist to 
an inner macro instruction (a macro 
instruction used as a model statement in a 
macro definition). The inner macro would 
regard the operand as a character string 
during generation. 


r- t-t-1 

(Name |Operation|Operand | 


Header 

Prototype 

Model 

Model 

Model 

Model 

Trailer 


Macro 

Generated 

Generated 

Generated 

Generated 


- 4 — — 

(MACRO 

(ADDNUM 

|L 
|A 
|A 
j ST 
(MEND 

i 

..4 - 

J 

J SNUM,SREG.SAREA 
( SREG, SNUM (1) 
j SREG, SNUM (2) 
j SREG, SNUM (3) 
j SREG,SAREA 

1 

j _ 

"f 

(ADDNUM 

i (A ,B ,C) , 6 ,SUM 

|L 

| 6 ,A 

1 A 

| 6 ,B 

1 A 

( 6 ,C 

(ST 

( 6 ,SUM 

_ 1 _ 

x _ _ 


o 



Omitted subcperands are handled in the 
same way as emitted operands. If ( ) 
appears as an operand, however, it is 
treated as a character string, not as a 
sublist with all suboperands omitted. 


If a macro instruction is written in the 
alternate statement format, each sublist 
operand may be written on a separate line; 
the macro instruction may be written on as 
many lines as there are operands, including 
sublist operands. 


The limit of 127 characters (255 for 
assembler F) applies to an entire sublist 
including suboperands, parentheses, and 
commas within these parentheses. 


If SP1 is a symbolic parameter in a 
prototype statement, and the corresponding 
operand of a macro instruction is a 
sublist, then SP1 (n) may be used in a model 
statement to refer to the nth operand of 
the sublist, where n may be any arithmetic 
expression allowed in a SETA instruction. 
The SETA instruction is described in 
Section 9. If SP1 is a symbolic parameter, 
and the corresponding operand of a macro 
instruction is a sublist, then SP1 refers 
to the entire sublist (including 
parentheses) . 


If the sublist notation is used, but the 
operand is not a sublist, then &P 1 ( 1 ) 
refers to the operand and SPl (2) through 
SPl (100) (SPl (200) for assembler F) refer 
to null character value. If an operand has 
the form ( ), it is treated as a character 
string and not as a sublist. 


For example, consider the following 
macro definition, macro instruction, and 
generated statements. 


The operand of the macro instruction 
that corresponds to symbolic parameter SNUM 
is a sublist. One of the operands in the 
sublist is referred to in the operand entry 
cf three of the model statements. For 
example, SNUM (1) refers to the first 
operand in the sublist corresponding to 
symbolic parameter SNUM. The first operand 
of the sublist is A. Therefore, A replaces 
SNUM (1) to form part of the generated 
statement. 

Note ; When referring to an operand in a 
sublist, the left parenthesis of the 
sublist notation must immediately follow 
the last character of the symbolic 
parameter, e.g., SNUM (1) . A period should 
net be placed between the left parenthesis 
and the last character of the symbolic 
parameter. 

A period may be used between these two 
characters only when the programmer wants 
to concatenate the left parenthesis with 
the characters that the symbolic parameter 
represents. The following example shows 
what would be generated if a period 
appeared between the left parenthesis and 
the last character of the symbolic 
parameter in the first model statement cf 
the above example. 

r - t- T - 1 

JName jOperation(Operand | 

i-- 4 -4-1 

Prototype| |ADDNUM |SNUM,SREG, 6 AREA j 

Model j (L iSREG,SNUM. (1) | 

F-+-+--I 

Macro j (ADDNUM j (A,B,C) , 6 ,SUM | 

Generated) |L ( 6 , (A,B,C) (1) j 

i-1_ x -j 

The symbolic parameter SNUM is used in 
the operand entry of the model statement. 
The characters (A,B,C) of the macro 
instruction correspond to SNUM. Since SNUM 
is immediately followed by a perio<3, SNUM 
and the period are replaced by (A,E,C). 

The period does not appear in the generated 
statement. The resulting generated 
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statement is an invalid assembler language 
statement. 


Inner Macro Instructions 


A macro instruction may be used as a model 
statement in a macro definition. Macro 
instructions used as model statements are 
called inner macro instructions. 


A macro instruction that is not used as 
a model statement is referred to as an 
cuter macro instruction. 


r t- t ~ — — 

JName JOperation JOperand 

1 _L -L 

r 

Header J 

| MACRO 

T 

1 

Prototype j 

j COMP 

j SR 1 , SR2 , SS , ST , SU 

Model | 

SR 

| SRI , SR2 

Model j 

|C 

j SR 1 , ST 

Model j 

j ENE 

J SU 

1 

Inner | 

J- 

jADDNUM 

|SS,12,ST| 

1 

Model j 

, - 

SU j A 

■ 4 — — J 

j SR 1 , ST 

Trailer j 

JMEND 

1 

1 

1 

jMACRO 
| ADDNUM 

1 

j SNUM,SREG , SAREA 



Outer |K 

j COMP 

|10,11, (X 

Any symbolic parameters used in an inner 

y — 

—j.- 

- 1 - 

macro instruction are replaced by the 

Generated| 

SR 

110 , 11 

corresponding operands of the outer macro 

Generated j 

1 C 

1 10 ,J 

instruction. 

Generated j 

J BNE 

IK 


1 

Generated| 

1 — 

|L 

|12,X 

The macro definition corresponding to an 

Generated j 

|A 

j 12 , Y 

inner macro instruction is used to generate 

Generated j 

|A 

I 12 , Z 

the statements that replace the inner macro 

Generated j 

|ST 

112 ,J 

instruction. 

1 

j- 



Generated|K 

|A 

1 10 ,J 


L 

A 

A 

ST 

MEND 


SREG,SNUM (1) 
SREG , SNUM (2) 
SREG , SNUM (3) 
SREG, SA REA 


The ADDNUM macro instruction of the 
previous example is used as an inner macro 
instruction in the following example. 


The inner macro instruction contains two 
symbolic parameters, SS and ST. The 
characters (X,Y,Z) and J of the macro 
instruction correspond to SS and ST, 
respectively. Therefore, these characters 
replace the symbolic parameters in the 
operand entry of the inner macro 
instruction. 


Note : An ampersand that is part of a 
symbolic parameter is not considered in 
determining whether a macro instruction 
operand contains an even number of 
consecutive ampersands. 


Levels of Macro Instructions 


The assembler then uses the macro 
definition that corresponds to the inner 
macro instruction to generate statements to 
replace the inner macro instruction. The 
fourth through seventh generated statements 
have been generated for the inner macro 
instruction. 


A macro definition that corresponds to an 
outer macro instruction may contain any 
number of inner macro instructions. The 
outer macro instruction is called a first 
level macro instruction. Each of the inner 
macro instructions is called as second 
level macro instruction. 

Ihe macro definition that corresponds to 
a second level macro instruction may 
contain any number of inner macro 
instructions. These macro instructions are 
called third level macro instructions, etc. 


Ihe number of levels of macro 
instructions that may be used depends upon 
the complexity of the macro definition and 
the amount of storage available. This is 
described in detail in Appendix H. 
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Section 9. How to Write Conditioned Assembly Instructions 


The conditional assembly instructions allow 
the programmer to: (1) define and assign 
values to SET symbols that can be used to 
vary parts of generated statements, and (2) 
vary the sequence of generated statements. 
Thus, the programmer can use these 
instructions to generate many different 
sequences of statements from the same macro 
definition. 

There are 13 conditional assembly 
instructions, 10 of which are described in 
this section. The other three conditional 
assembly instructions—GBLA, GBLB, and 
GBLC—are described in Section 10. The 
instructions described in this section are: 

LCLA SETA AIF ANOP 

LCLB SETB AGO 

LCLC SETC ACTR 

The primary use of the conditional 
assembly instructions is in macro 
definitions. However, all of them may be 
used in an assembler language source 
program. 

Where the use of an instruction outside 
macro definitions differs from its use 
within macro definitions, the difference is 
described in the subsequent text. 

The LCLA, LCLB, and LCLC instructions 
are used to define and assign initial 
values to local SET symbols. 

The SETA, SETB, and SETC instructions 
may be used to assign arithmetic, binary, 
and character values, respectively, to SET 
symbols. The SETB instruction is described 
after the SETA and SETC instructions, 
because the operand of the SETB instruction 
is a combination of the operands of the 
SETA and SETC instructions. 

The AIF, AGO, and ANOP instructions may 
be used in conjunction with sequence 
symbols to vary the sequence in which 
statements are assembled. The programmer 
can test attributes assigned by the 
assembler to symbols or macro instruction 
operands to determine which statements are 
to be processed. The ACTR instruction may 
be used to limit the number of AIF and AGO 
branches executed in any assembly. 

Examples illustrating the use of 
conditional assembly instructions are 
included throughout this section. A chart 
summarizing the elements that can be used 
in each instruction appears at the end of 
this section. 


SET Symbols 


SET symbols are one type of variable 
symbol. The symbolic parameters discussed 
in Section 7 are another type of variable 
symbol. SET symbols differ from symbolic 
parameters in three ways: (1) where they 
can be used in an assembler language source 
program, (2) how they are assigned values, 
and (3) how the values assigned to them can 
be changed. 

Symbolic parameters can only be used in 
macro definitions, whereas SET symbols can 
be used inside and outside macro 
definitions. 

SET symbols are assigned values by SETA, 
SETB, and SETC conditional assembly 
instructions and by local or global 
declarations. 

Each symbolic parameter is assigned a 
single value for one use of a macro 
definition, whereas the values assigned to 
each SETA, SETB, and SETC symbol are not so 
restricted. 


DEFINING SET SYMBOLS 


SET symbols must be defined by the 
programmer before they are used. When a 
SET symbol is defined it is assigned an 
initial value. SET symbols may be assigned 
new values by means of the SETA, SETB, and 
SETC instructions. A SET symbol is defined 
when it appears as an operand of an LCLA, 
LCLB, or LCLC instruction. 


USING VARIABLE SYMBOLS 


The SETA, SETB, and SETC instructions may 
be used to change the values assigned to 
SETA, SETB, and SETC symbols, respectively. 
When a SET symbol appears in the name of 
operand entry of a statement, the current 
value of the SET symbol (i.e., the last 
value assigned to it) replaces the SET 
symbol in the statement, when a SETC 
symbol appears in the operation entry of a 
statement, the current value of the SETC 
symbol replaces the Set symbol in the 
statement. 
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For example, if SA is a symbolic 
parameter, and the corresponding characters 
of the macro instruction are the symbol 
HERE, then HERE replaces each occurrence of 
SA in the macro definition. However, if SA 
is a SET symbol, the value assigned to SA 
can be changed, and a different value can 
replace various occurrences of SA in the 
macro definition. 

The same variable symbol may not be used 
as a symbolic parameter and as a SET symbol 
in the same macro definition. 

The following illustrates this rule. 

r- 1 - 1 - 

|Name |Operation}Operand 

j.-1-f- 

j SNAME j MOVE j STO,SFROM 

l-JL-i.- 


is used in the operand entry of a macro 
instruction, and the value assigned to the 
SET symbol is in the form of sublist 
notation, the operand is not considered a 
sublist. 


Attributes 


The assembler assigns attributes to macro 
instruction operands and to symbols in the 
program. These attributes may be referred 
to only in conditional assembly 
instructions. 

•j There are six kinds of attributes. They 

| are: type, length, scaling, integer, 

J count, and number. 


If the statement above is a prototype 
statement, then 6NAME, STO, and SFROM may 
not be used as SET symbols in the macro 
definition. 

The same variable symbol may not be used 
as two different types of SET symbols in 
the same macro definition. Similarly, the 
same variable symbol may not be used as two 
different types of SET symbols outside 
macro definitions. 

For example, if SA is a SETA symbol in a 
macro definition, it cannot be used as a 
SETC symbol in that definition. Similarly, 
if SA is a SETA symbol outside macro 
definitions, it cannot be used as a SETC 
symbol outside macro definitions. 


If an outer macro instruction operand is 
a symbol before substitution, then the 
attributes of the operand are the same as 
the corresponding attributes of the symbol. 
The symbol must appear in the name entry of 
an assembler language statement or be an 
external symbol. The statement must be 
outside macro definitions and must not 
contain any variable symbols. 

If an inner macro instruction operand is 
a symbolic parameter, then attributes of 
the operand are the same as the attributes 
of the corresponding outer macro 
instruction operand. 

Each attribute has a notation associated 
with it. The notations are: 


The same variable symbol if declared 
local may be used in two or more macro 
definitions and outside macro definitions. 
If such is the case, the variable symbol 
will be considered a different variable 
symbol each time it is used. 

For example, if SA is a variable symbol 
(either SET symbol or symbolic parameter) 
in one macro definition, it can be used as 
a variable symbol (either SET symbol or 
symbolic parameter) in another definition. 
Similarly, if SA is a variable symbol (SET 
symbol or symbolic parameter) in a macro 
definition, it can be used as a SET symbol 
outside macro definitions. 


Attribute 

Type 

Length 

Scaling 

Integer 

Count 

Number 


Notation 

T* 

L' 

S' 

I* 

K* 

N* 


If a macro instruction operand is a 
sublist, the programmer may refer to the 
attributes of either the sublist or each 
operand in the sublist. The type, length, 
scaling, and integer attributes of a 
sublist are the same as the corresponding 
attributes of the first operand in the 
sublist. 


All variable symbols may be concatenated 
with other characters in the same way as 
symbolic parameters. The rules for 
concatenation are in Section 7 under the 
subsection "Model Statements." 

Variable symbols in macro instructions 
are replaced by the values assigned to 
them, immediately prior to the start of 
processing the definition. If a SET symbol 


All the attributes of macro instruction 
operands may be referred to in conditional 
assembly instructions within macro 
definitions. However, only the type, 
length, scaling, and integer attributes of 
symbols may be referred to in conditional 
assembly instructions outside macro 
definitions. Symbols appearing in the name 
entry of generated statements are not 
assigned attributes. 
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The programmer may refer to an attribute 
in the following ways: 

1. In a statement that is outside macro 
definitions, he may write the notation 
for the attribute immediately followed 
by a symbol. (E.g., T'NAME refers to 
the type attribute of the symbol 
NAME.) 

2. In a statement that is in a macro 
definition, he may write the notation 
for the attribute immediately followed 
by a symbolic parameter. (E.g., L* 

6 NAME refers to the length attribute 
of the characters in the macro 
instruction that correspond to 
symbolic parameter 6NAME; L'£NAME(2) 
refers to the length attribute of the 
second operand in the sublist that 
corresponds to symbolic parameter 
SNAME.) 


TYPE ATTRIBUTE (T*) 


The type attribute of a macro instruction 
operand or a symbol is a letter. 

The programmer may refer to a type 
attribute in the operand of a SETC 
instruction, or in character relations in 
the operands of SETB or AIF instruction, or 
in other instructions where use of the 
character is valid. 

The following letters are used for 
symbols that name DC and DS statements and 
for outer macro instruction operands that 
are symbols that name DC or DS statements. 

A A-type address constant, implied 

length, aligned. 

B Binary constant. 

C Character constant. 

D Long floating-point constant, 

implied length, aligned. 

E Short floating-point constant, 

implied length, aligned. 

F Fullword fixed-point constant, 

implied length, aligned. 

G Fixed-point constant, explicit 

length. 

H Halfword fixed-point constant, 

implied length, aligned. 

K Floating-point constant, explicit 

length. 

L Extended floating-point constant, 

implied length, aligned. 

P Packed decimal constant. 

R A-, S-, V-, or Y-type address 

constant, explicit length. 

S S-type address constant, implied 

length, aligned. 

V V-type address constant, implied 

length, aligned. 


X Hexadecimal constant. 

Y Y-type address constant, implied 

length, aligned. 

Z Zoned decimal constant. 

The following letters are used for 
symbols (and outer macro instruction 
operands that are symbols) that name 
statements other than DC or DS statements, 
or that appear in the operand field of an 
EXTRN or WXTRN statement. 

I Machine instruction 

J Control section name 

M Macro instruction 

T EXTRN symbol 

W CCW instruction 

$ WXTRN symbol 

The following letters are used for inner 
and outer macro instruction operands only. 

N Self-defining term 

0 Omitted operand 

The letter U (Undefined) is used for 
inner and outer macro-instruction operands 
that cannot be assigned any of the above 
letters. The type attribute of all 
literals appearing as macro instruction 
operands is U. This also is true for inner 
macro instruction operands that are 
ordinary symbols or variable symbols. 
Because the attributes are not available at 
the necessary time, this letter is also 
assigned to symbols that name EQU and LTORG 
statements, to any symbols occurring more 
than once in the name entry of source 
statements, and to all symbols naming DC 
and DS statements with expressions or 
variable symbols as modifiers. The type 
attribute also is undefined when the 
modifier expression consists solely of 
self-defining terms. 

The attributes of A, B, C, and D in the 
following examples are undefined: 


A 

DC 

3FL (A-B) *15 

B 

DC 

(A-B) F* 15* 

C 

DC 

SX* 1' 

D 

DC 

FL (3-2) *1* 


LENGTH (L«) , SCALING (S«) , AND INTEGER (!') 
ATTRIBUTES 


The length, scaling, and integer attributes 
of macro instruction operands and symbols 
are numeric values. 

The length attribute of a symbol (or of 
a macro instruction operand that is a 
symbol) is as described in Part 1 of this 
publication. Reference to the length 
attribute of a variable symbol is illegal 
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except for symbolic parameters in SETA, 
SETB, and AIF statements. If the basic L* 
attribute is desired, it can be obtained as 
follows: 

£A SETC 'Z * 

SB SETC 'L'" 

MVC SA. (SB6A) ,X 

After generation, this would result in 
MVC Z (L'Z) ,X 


replace the variable symbols, rather than 
the variable symbols, are used to determine 
the count attribute. 

The programmer may refer to the count 
attribute in the operand field of a SETA 
instruction, or in arithmetic relations in 
the operand fields of SETB and AIF 
instructions that are part of a macro 
definition. 



Reference must not be made to the length 
attributes of symbols or macro instruction 
operands whose type attributes are the 
letters M, N, 0, T, $, orU. 

Scaling and integer attributes are 
provided for symbols that name fixed-point, 
floating-point, and decimal DC or DS 
statements. 

Fixed and Floating Point . The scaling 
attribute of a fixed point or floating 
point number is the value given by the 
scale modifier. The integer attribute is a 
function of the scale and length attributes 
of the number. 


NUMBER ATTRIBUTE (N*) 


The programmer may refer to the number 
attribute of macro instruction operands 
only. 

The number attribute is a value equal to 
the number of operands in an operand 
sublist. The number of operands in an 
operand sublist is equal to one plus the 
number of commas that indicate the end of 
an operand in the sublist. 

The following examples illustrate this 
rule. 


Decimal . The scaling attribute of a 
decimal number is the number of decimal 
digits to the right of the decimal point. 
The integer attribute of a decimal number 
is the number of decimal digits to the left 
of the decimal point. 


(A,B,C,D,E) 
(A , , C , D , E) 
(A , B, C , D) 
(,B,C,D,E) 
(A,B,C,D,) 
(A,B,C,D, ,) 


5 operands 
5 operands 

4 operands 

5 operands 

5 operands 

6 operands 


Scaling and integer attributes are 
available for symbols and macro instruction 
operands only if their type attributes are 
H, F, and G (fixed point) ; D, E, K, and L 
(floating point); or P and Z (decimal). 


If the macro instruction operand is not 
a sublist, the number attribute is one. If 
the macro instruction operand is omitted, 
the number attribute is zero. 


The programmer may refer to the length, 
scaling, and integer attributes in the 
operand field of a SETA instruction, or in 
arithmetic relations in the operand fields 
of SETB or AIF instructions. 


The programmer may refer to the number 
attribute in the operand field of a SETA 
instruction, or in arithmetic relations in 
the operand fields of SETB and AIF 
instructions that are part of a macro 
definition. 


COUNT ATTRIBUTE (K 1 ) 


ASSIGNING INTEGER ATTRIBUTES TO SYMBOLS 


The programmer may refer to the count 
attribute of macro instruction operands 
only. 

The count attribute is a value equal to 
the number of characters in the macro 
instruction operand after substituting for 
variable symbols, excluding commas. If the 
operand is a sublist, the count attribute 
includes the beginning and ending 
parentheses and the commas within the 
sublist. The count attribute of an omitted 
operand is zero. 

If a macro instruction operand contains 
variable symbols, the characters that 


The integer attribute is computed from the 
length and scaling attributes. 

Fixed Point . The integer attribute of a 
fixed-point number is equal to eight times 
the length attribute of the number minus 
the scaling attribute minus one; i.e., 

I * =8*L*-S *-1. 

Each of the following statements defines 
a fixed-point field. The length attribute 
of HALFCON is 2, the scaling attribute is 
6 , and the integer attribute is 9. The 
length attribute of ONECON is 4, the 
scaling attribute is 8, and the integer 
attribute is 23. 



86 Part 3: Conditional Assembly and Macro Facilities 






r--- t-t-- 

| Name |Operation|Operand 

j.-.j.--|-- 

| HALFCON j DC {HS6'-25.93' 

JONECON j DC JFS8*100.3E-2 

l -x-x--- 


I 

-I 


j 


Floatincr Point ; The integer attribute of a 
type D or E floating-point number is equal 
to two times the difference between the 
length attribute of the number and one, 
minus the scaling attribute; i.e., 

I’=2* (L*- 1) -S'. 


Sequence Symbols 


The name entry of a statement may contain a 
sequence symbol. Sequence symbols provide 
the programmer with the ability to vary the 
sequence in which statements are processed 
by the assembler. 


A sequence symbol is used in the operand 
entry of an AIF or AGO statement to refer 
to the statement named by the sequence 
symbol. 


Because of its low order characteristic, 
the integer attribute of a type L constant 
with a length greater than 8 bytes is two 
less than the value indicated in the 
formula above. The integer attribute of a 
type L constant with a length of 8 bytes or 
less is the same as the value indicated in 
the formula above. 


A sequence symbol may be used in the 
name entry of any statement that does not 
contain a symbol or SET symbol, except a 
prototype statement, or a MACRO, LOLA, 
LCLB, LCLC, GBLA, GBLB, GBLC, ACTR, ICTL, 
ISEQ, or COPY instruction. 



Each of the following statements defines 
a floating-point value. The length 
attribute of SHORT is 4, the scaling 
attribute is 2, and the integer attribute 
is 4. The length attribute of LONG is 8, 
the scaling attribute is 5, and the integer 
attribute is 9. 

r- t-t- 

(Name JOperation!Operand 

Y -f-i- 

|SHORT J DC j ES2*46.415' 

|LONG |DC |DS5*-3.729' 

i_x_x_ 


A sequence symbol consists of a period 
followed by one through seven letters 
and/or digits, the first of which must be a 
letter. 


The following are valid sequence 
symbols: 

I 

-j .READER . A23456 

j .LOOP2 .X4F2 

| .N .S4 



Decimal : The integer attribute of a packed 

decimal number is equal to two times the 
length attribute of the number minus the 
scaling attribute minus one; i.e., 

I'=2*L'-S•-1. The integer attribute of a 
zoned decimal number is equal to the 
difference between the length attribute and 
the scaling attribute; i.e., I'=L'-S'. 

Each of the following statements defines 
a decimal field. The length attribute of 
FIRST is 2, the scaling attribute is 2, and 
the integer attribute is 1. The length 
attribute of SECOND is 3, the scaling 
attribute is 0, and the integer attribute 
is 3. The length attribute of THIRD is 4, 
the scaling attribute is 2, and the integer 
attribute is 2. The length attribute of 
FOURTH is 3, the scaling attribute is 2, 
and the integer attribute is 3. 

r - T _,- T - 1 

|Name |Operation{Operand } 

F-+-+- i 

jFIRST {DC {P* +1.25* j 

{SECOND {DC j Z'-543* j 

{THIRD jDC j Z'79.68' j 

{FOURTH {DC jP*79.68' J 

L_X-X_J 


The following are invalid sequence 


symbols: 


CARDAREA 

(first character is not a 
period) 

. 246B 

(first character after 
period is not a letter) 

.AREA2456 

(more than seven characters 
after period) 

.BCDX84 

(contains a special 
character other than initial 
period) 

.IN AREA 

(contains a special 
character, i.e., blank, 
other than initial period) 


If a sequence symbol appears in the name 
entry of a macro instruction, and the 
corresponding prototype statement contains 
a symbolic parameter in the name entry, the 
sequence symbol does not replace the 
symbolic parameter wherever it is used in 
the macro definition. 


The following example illustrates this 
rule. 
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r - T - r - 

Name j Operation|Operand 

-+- 


h 


■+ 

| jMACRO 

IjSNAME |MOVE 
2 j SNAME j ST 
I |L 

! 1ST 

I |L 

| j MEND 


j STO,SFROM 
j 2 f SAVEAREA 
|2,6FROM 
j 2,STO 
j 2,SAVEAREA 


.SYM (MOVE 

.. j .. 

(fielda,fieldb 

(ST 

J. 

j 2,SAVEAREA 

|L 

(2,FIELDB 

(ST 

(2,FIELDA 

|L 

(2,SAVEAREA 




The symbolic parameter SNAME is used in 
the name entry of the prototype statement 
(statement 1) and the first model statement 
(statement 2) . In the macro instruction 
(statement 3) a sequence symbol (.SYM) 
corresponds to the symbolic parameter 
SNAME. SNAME is not replaced by .SYM, and, 
therefore, the generated statement 
(statement 4) does not contain a name 
entry. 


LCLA, LCLB, LCLC--Define SET Symbols 

The typical form of these instruction is: 


conditional assembly instructions, and 
punch and REPRO statements outside macro 
definitions, and before the first control 
section of the program. 


SETA-Set Arithmetic 


The SETA instruction may be used to assign 
an arithmetic value to a SETA symbol. The 
form of this instruction is: 


r - T - T -•»- 1 

|Name |Operation J Operand | 

f-+-+--1 

{A SETA j SETA JA SETA arithmetic ( 

|symbol j jexpression j 

l-X-JL-J 


The expression in the operand entry is 
evaluated as a signed 32-bit arithmetic 
value which is assigned to the SETA symbol 
in the name entry. The minimum and maximum 
allowable values of the expression are -2 3f 
and +2 31 -1, respectively. 

The expression may consist of one term 
or an arithmetic combination of terms. The 
terms that may be used alone or in 
combination with each other are 
self-defining terms, variable symbols, and 
the length, scaling, integer, count, and 
number attributes. Self-defining terms are 
described in Part 1 of this publication. 



r- t-t- 1 

J Name |Operation|Operand | 


(Not used,jLCLA, jOne or more variable j 
jmust not (LCLB, or (symbols, that are ( 

(be (LCLC (to be used as SET ( 

(present j (symbols, separated j 

j | (by commas j 

L-X-X-J 

The LCLA, LCLB, and LCLC instructions 
are used to define and assign initial 
values to SETA, SETB, and SETC symbols, 
respectively. The SETA, SETB, and SETC 
symbols are assigned the initial values of 
0 , 0, and null character value, 
respectively. 


Note : A SETC variable symbol may appear in 
a SETA expression only if the value of the 
SETC variable is one to eight decimal 
digits. The decimal digits will be 
converted to a positive arithmetic value. 

The arithmetic operators that may be 
used to combine the terms of an expression 
are + (addition) , - (subtraction) , * 
(multiplication) , and / (division) . 

An expression may not contain two terms 
or two operators in succession, nor may it 
begin with an operator. 

The following are valid operand fields 
Of SETA instructions: 


The programmer should not define any SET 
symbol whose first four characters are 
SSYS. 


SAREA+X'2D* 
SBETA*10 
L * SHERE+32 


I'SN/25 

SEXIT-S'SENTRY*1 
29 


All LCLA, LCLB, or LCLC instructions in 
a macro definition must appear immediately 
after the prototype statement and all GBLA, 
GBLB or GBLC instructions. All LCLA, LCLB, 
or LCLC instructions outside macro 
definitions must appear after all macro 
definitions in the source program, after 
all GBLA, GBLB, and GBLC instructions 
outside macro definitions, before all 


The following are invalid operand fields 
of SETA instructions: 


6 AREAX * C' 
SFIELD+- 
-SDELTA*2 
*+32 

NAME/15 


(two terms in succession) 

(two operators in succession) 
(begins with an operator) 
(begins with an operator; 
two operators in succession) 
(NAME is not a valid term) 
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EVALUATION OF ARITHMETIC EXPRESSIONS 


Using SETA Symbol s 


The procedure used to evaluate the 
arithmetic expression in the operand of a 
SETA instruction is the same as that used 
to evaluate arithmetic expressions in 
assembler language statements. The only 
difference between the two types of 
arithmetic expressions is the terms that 
are allowed in each expression. 


The following evaluation procedure is 
used: 


The arithmetic value assigned to a SETA 
symbol is substituted for the SETA symbol 
when it is used in an arithmetic relation. 
If the SETA symbol is not used in an 
arithmetic expression, the arithmetic value 
is completely converted to an unsigned 
integer, with leading zeros removed. If 
the value is zero, it is converted to a 
single zero. 


The following example illustrates this 
rule: 


1. Each term is given its numerical 
value. 


2. The arithmetic operations are 

performed moving from left to right. 
However, multiplication and/or 
division are performed before addition 
and subtraction. 


3. The computed result is the value 
assigned to the SETA symbol in the 
name entry. 


The arithmetic expression in the operand 
entry of a SETA instruction may contain one 
or more sequences of arithmetically 
combined terms that are enclosed in 
parentheses. A sequence of parenthesized 
terms may appear within another 
parenthesized sequence. 


T- 

JOperat 

i - 

MACRO 

MOVE 

LCLA 

SETA 

SETA 

SETA 

SETA 

ST 

L 

ST 

L 

MEND 


I Name 


ion{Operand 
- -f- 


SNAME 

SA 
S E 
SC 
SD 

SNAME 


STC,SFEOM 
SA , SB , SC , SD 
10 
12 

SA- SB 
6 A+SC 

2,SAVEA REA 
2,SFRCM SC 
2,STCSD 
2,SAVEAREA 


HERE 

HERE 


MOVE 


FIELDA,FIELDB 


ST 

L 

ST 

L 


2,SAVEAREA 
2,FIELDB2 
2,FIELDA8 
2,SAVEAREA 


The following are examples of SETA 
instruction operands that contain 
parenthesized sequences of terms. 

(L' SHERE+32) *29 

SAREA+X'2E'/ (SEXIT-S*SENTRY*1) 

SEETA* 10* (I' S/25/ (SEX IT-S* SENTRY* 1) ) 

The parenthesized portion or portions of 
an arithmetic expression are evaluated 
before the rest of the terms in the 
expression are evaluated. If a sequence of 
parenthesized terms appears within another 
parenthesized sequence, the innermost 
sequence is evaluated first. 

The SETA arithmetic expression can only 
have five levels of parentheses. The 
parentheses required in subscripting, 
substring, and sublist notation count when 
determining these levels. A counter is 
maintained for each SETA statement and 
increased by one for each occurrence of a 
variable symbol as well as the operation 
entry. The maximum value this counter may 
attain is 35. (See Appendix H) . 


Statements 1 and 2 assign to the SETA 
symbols SA and SB the arithmetic value # *10 
and +12, respectively. Therefore, 
statement 3 assigns the SETA symbol SC the 
arithmetic value -2. When SC is used in 
statement 5, the arithmetic value -2 is 
converted to the unsigned integer 2. When 
SC is used in statement 4, however, the 
arithmetic value -2 is used. Therefore, SE 
is assigned the arithmetic value *8. When 
SD is used in statement 6, the arithmetic 
value +8 is converted to the unsigned 
integer 8. 


The following example shows how the 
value assigned to a SETA symbol may be 
changed in a macro definition. 
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1 


r- t-t- 

|Naire J Operation j Operand 


SNAME 

SA 

SNAME 

SA 


MACRO 

MOVE 

LCLA 

SETA 

ST 

L 

SETA 

ST 

L 

MEND 


STO,SFROM 

SA 

5 

2,SAVEAREA 
2,SFROMSA 
8 

2,STOSA 
2,SAVEAREA 


HERE 

HERE 


MOVE 


FIELDA,FIELDB 


ST 

L 

ST 

L 


2,SAVEAREA 
2,FIELDB5 
2 ,FIELDA8 
2,SAVEAREA 


Statement 1 assigns the arithmetic value 
+5 to SETA symbol SA. In statement 2, SA 
is converted to the unsigned integer 5. 
Statement 3 assigns the arithmetic value +8 
to SA. In statement 4, therefore, SA is 
converted to the unsigned integer 8, 
instead of 5. 


r - 7 - T --- 

J Name J Operation|Operand 

f--4-4- 

I I macro | 

1| j ADDX J SNUMEER,SREG 

j j LCLA | SLAST 

2 j SLAST |SETA JK*SNUMEER 

j j L |SREG,SNUMEER (1) 

3J |A jSREG,SNUMEER (SLAST) 

| j ST |SREG,SNUMEER (1) 

| jMEND j 

F-+- i - 

4| jADDX | (A,B,C,D,E) ,3 

I*- 4 - 4 - 

| |L 13 ,A 

I |A 13,E 

1 |ST |3,A 

-i-1- 


A 



H 

I 

H 


SNUMEER is the first symbolic parameter 
in the operand entry of the prototype 
statement (statement 1) . The corresponding 
characters, (A,E,C,D,E), of the macro 
instruction (statement 4) are a sufclist. 
Statement 2 assigns to SLAST the arithmetic 
value +5, which is equal to the number of 
operands in the sublist. Therefore, in 
statement 3, SNUMBER (SLAST) is replaced by 
the fifth operand of the sublist. 


A SETA symbol may be used with a 
symbolic parameter to refer to an operand 
in an operand sublist. If a SETA symbol is 
used for this purpose it must have been 
assigned a value in the range 1 to 100. 


Any expression that may be used in the 
operand of a SETA instruction may be used 
to refer to an operand in an operand 
sublist. 


Sublists are described in Section 8 
under "Operand Sublists.* 


The following macro definition may be 
used to add the last operand in an operand 
sublist to the first operand in an operand 
sublist and store the result at the first 
operand. A sample macro instruction and 
generated statements follow the macro 
definition. 


SETC- Set Character 


The SETC instruction is used to assign a 
character value to a SETC symbol. The form 
of this instruction is: 


Name 

|Operation J Operand 

A SETC 

T 

j SETC 

i 

|Cne operand, cf 

symbol 

1 

jthe form described 


1 

- J—-- 

jbelow 

_j._ _ — — — 


The operand may consist of the type 
attribute, a character expression, a 
substring notation, or a concatenation of 
substring notations and character 
expressions. A SETA symbol may appear in 
the operand of a SETC statement. The 
result is the character representation of 
the decimal value, unsigned, with leading 
zercs removed. If the value is zero, one 
decimal zero is used. 



TYPE ATTRIBUTE 


The character value assigned to a SETC 
symbol may be a type attribute. If the 
type attribute is used, it must appear 
alone in the operand field. The f ollowing 
ex ample assigns to the SETC symb cl € TYPE 


O 
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the letter that is the type attribute of 
the macro instruction operand that 
corresponds to the symbolic parameter £ABC. 


r- 

| Name 

V - 

j STYPE 

L- 


T-T- 

J Operation J Operand 

+-+- 

JSETC (T'£ABC 

.x-x- 


I 

A 

I 

.j 


r - T - T -1 

|Name (Operation(Operand J 

I--+-+-1 

(gLENGTHISETC | * L * * SYMBOL * j 

l_i_X-J 

Variable symbols may be concatenated 
with other characters in the operand field 
of a SETC instruction according to the 
general rules for concatenating variable 
symbols with other characters (see Section 
7) . 


If SALPHA has been assigned the 
character value AB%4, either of the 
following statements may be used to assign 

CHARACTER EXPRESSION the character value ABX4RST to the variable 

symbol SGAMMA. 


A character expression consists of any 
combination of characters enclosed in 
apostrophes. The maximum length of a 
character expression is 127 characters. 

The character value enclosed in 
apostrophes in the operand field is 
assigned to the SETC symbol in the name 
entry. The maximum length character value 
that can be assigned to a SETC symbol is 
eight characters. If a value greater than 
8 is specified, the leftmost 8 characters 
will be used. 


EVALUATION OF CHARACTER EXPRESSIONS : The 
following statement assigns the character 
value ABJ54 to the SETC symbol 6 ALPHA: 


r -t- t --- 1 

| Name (Operation(Operand | 

V -+-+--I 

(SGAMMA j SETC j * gALPHA.RST* j 

L-X-X-J 


r- t-t-1 

(Name JOperation|Operand J 

I--+-+- i 

j £ DELTA j SETC | * £ALPHA*. ' RST* j 

L-X-X-J 

Two ampersands must be used to represent 
an ampersand that is not part of a variable 
symbol. Both ampersands become part of the 
character value assigned to the SETC 
symbol. They are not replaced by a single 
ampersand . 


r- t-T' 


(Name |Operation|Operand 

\r -+-+- 

jSALPHA (SETC (*AB%4* 

l-X---—X--- 


1 

I 

A 

I 

J 


More than one character expression may 
be concatenated into a single character 
expression by placing a period between the 
terminating apostrophe of one character 
expression and the opening apostrophe of 
the next character expression. For 
example, either of the following statements 
may be used to assign the character value 
ABCDEF to the SETC symbol £BETA. 


Name 

J Operation j Operand 

X X 

£BETA 

| SETC 

(*ABCDEF' 

£BETA 

| SETC 

j *ABC *.'DEF * 


X _ - 

- X-- - -— -- 


Two apostrophes must be used to 
represent a apostrophe that is part of a 
character expression. 

The following statement assigns the 
character value L*SYMBOL to the SETC symbol 
gLENGTH. 


The following statement assigns the 
character value HALF££ to the SETC symbol 
£AND. 


r - T - T "- 

j Name |Operation(Operand 

h-4—-4- 

j £AND (SETC j * HALF££ * 

l-X-X- 

In this example. 


j Name 

j.- 

j £A 


j Operation j Operand 

4-4-*- 

(SETC j*££BETA*(2,5) 

.X-X- 


1 

I 

A 

I 

j 


i 

! 

A 

I 

.j 


*££BETA* (2,5) produces £BETA which is 
considered a character string, not a 
variable symbol. 


SUBSTRING NOTATION 


The character value assigned to a SETC 
symbol may be a substring character value. 
Substring character values permit the 
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programmer to assign part of a character 
value to a SETC symbol. 

If the programmer wants to assign part 
of a character value to a SETC symbol, he 
must indicate to the assembler in the 
operand of a SETC instruction: (1) the 
character value itself, and (2) the part of 
the character value he wants to assign to 
the SETC symbol. The concatenation of (1) 
and (2) in the operand of a SETC 
instruction is called a substring notation. 
The character value that is assigned to the 
SETC symbol in the name entry is called a 
substring character value. 

Substring notation consists of a 
character expression, immediately followed 
by two arithmetic expressions that are 
separated from each other by a comma and 
are enclosed in parentheses. These 
parentheses count when determining the 
number of levels of parentheses. The two 
arithmetic expressions may be any 
expression that is allowed in the operand 
of a SETA instruction. They may not be 
zero. 

The first expression indicates the first 
character (in the character expression) 
that is to be assigned to the SETC symbol 
in the name entry. The second expression 
indicates the number of consecutive 
characters in the character expression 
(starting with the character indicated by 
the first expression) that are to be 
assigned to the SETC symbol. If a 
substring specifies more characters than 
are in the character string, only the 
number of available characters will be 
supplied. If the first expression 
specifies a larger number than the number 
of characters in the character expression, 
a null string will be the result. 

The maximum size character expression 
the substring character value can be chosen 
from is 127 characters. 

The following are valid substring 
notations: 

& ALP HA' (2,5) 

'AB%4' (SAREA+2,1) 

1 SALPHA'.'RST' (6,SA) 

'ABC &GAMMA' (SA,SAREA+2) 

The following are invalid substring 
notations: 

'SBETA' (4,6) 

(blanks between character value and 

arithmetic expressions) 

*L''SYMBOL' (142-SXYZ) 

(only one arithmetic expression) 
'ABX4SALPHA' (8 SFIELD+2) 

(arithmetic expressions not separated by 


a comma) 

* BETA *4,6 

(arithmetic expressions not enclosed in 
parentheses) 

'SALPHA' (2,4) (1,1) 

(double substring notation is not 
permitted) 


CONCATENATING SUBSTRING NOTATIONS AND 
CHARACTER EXPRESSIONS : Substring notations 
may be concatenated with character 
expressions in the operand of a SETC 
instruction. If a substring notation 
follows a character expression, the two may 
be concatenated by placing a period between 
the terminating apostrophe of the character 
expression and the opening apostrophe of 
the substring notation. 

For example, if SALPHA has been assigned 
the character value ABX4, and SBETA has 
been assigned the character value ABCDEF, 
then the following statement assigns SGAMMA 
the character value ABX4BCD. 

r- T - r - 1 

|Name |Operation|Operand | 

b -+-+--I 

j 6GAMMA j SETC j* SALPHA*.* SBETA' (2,3) { 

l_-X-X-1 

If a substring notation precedes a 

character expression or another substring 
notation, the two may be concatenated by 
writing the opening apostrophe of the 
second item immediately after the closing 
parenthesis of the substring notation. 

The programmer may optionally place a 
period between the closing parenthesis of a 
substring notation and the opening 
apostrophe of the next item in the operand. 

If SALPHA has been assigned the 
character value AB%4, and 6ABC has been 
assigned the character value 5RS, either of 
the following statements may be used to 
assign SWORD the character value ABX45RS. 

r- t-t- 1 

|Name |Operation|Operand | 

b -+-+- i 

j SWORD|SETC j * SALPHA' (1,4)'SABC' j 

jSWORDjSETC j'SALPHA* (1,4)'SABC* (1,3) j 

l-X-X-J 

If a SETC symbol is used in the operand 
of a SETA instruction, the character value 
assigned to the SETC symbol must be one to 
eight decimal digits. 

If a SETA symbol is used in the operand 
of a SETC statement, the arithmetic value 
is converted to an unsigned integer with 
leading zeros removed. If the value is 
zero, it is converted to a single zero. 
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The character value assigned to a SETC 
symbol is substituted for the SETC symbol 
when it is used in the name, operation, or 
operand of a statement. 

For example, consider the following 
macro definition, macro instruction, and 
generated statements. 


Name 

|Operation]Operand 

X X 

T 

(MACRO 

SNAME |MOVE 
j LCLC 
SPREFIX j SETC 
SNAME j ST 
|L 
|ST 

II* 

|MEND 

x 

T 

|STO,SFROM 
j SPREFIX 
j 'FIELD' 
j 2,SAVEAREA 
j 2,SPREFIXSFROM 
j 2,SPREFIXSTO 
j 2,SAVEAREA 

1 

1 

HERE 

{move 

j 

1 A,B 

t 

HERE 

(ST 

|L 

|ST 

|L 

t 

j 2,SAVEAREA 
j 2,FIELDB 
j 2,FIELDA 
j 2,SAVEAREA 

X _ 


Statement 1 assigns the character value 
FIELD to the SETC symbol 6PREFIX. In 
statements 2 and 3, 6PREFIX is replaced by 
FIELD. 

The following example shows how the 
value assigned to a SETC symbol may be 
changed in a macro definition. 


r- t-t- 

|Name |Operation|Operand 


SNAME 

SPREFIX 

SNAME 

SPREFIX 


HERE 

HERE 


MACRO 

MOVE 

LCLC 

SETC 

ST 

L 

SETC 

ST 

L 

MEND 


MOVE 


ST 

L 

ST 

L 


STO,6FR0M 

SPREFIX 

'FIELD' 

2,SAVEAREA 

2,SPREFIXSFROM 

'AREA' 

2,SPREFIXSTO 
2,SAVEAREA 


A,B 


2,SAVEAREA 
2,FIELDB 
2,AREAA 
2,SAVEAREA 


Statement 1 assigns the character value 
FIELD to the SETC symbol SPREFIX. 
Therefore, SPREFIX is replaced by FIELD in 
statement 2. Statement 3 assigns the 


character value AREA to SPREFIX. 

Therefore, SPREFIX is replaced by AREA, 
instead of FIELD, in statement 4. 

The following example illustrates the 
use of a substring notation as the operand 
field of a SETC instruction. 


f - T - T - 

|Name |Operation|Operand 


SNAME 

SPREFIX 

SNAME 


HERE 

HERE 


MACRO 

MOVE 

LCLC 

SETC 

ST 

L 

ST 

L 

MEND 


MOVE 


ST 

L 

ST 

L 


STO,SFROM 
SPREFIX 
•STO' (1,5) 

2,SAVEAREA 
2,SPREFIXSFROM 
2, STO 

2,SAVEAREA 


FIELDA,B 


2,SAVEAREA 
2,FIELDB 
2,FIELDA 
2,SAVEAREA 


Statement 1 assigns the substring 
character value FIELD (the first five 
characters corresponding to symbolic 
parameter STO) to the SETC symbol SPREFIX. 
Therefore, FIELD replaces SPREFIX in 
statement 2. 


SETB-Set Binary 


The SETB instruction may be used to assign 
the binary value 0 or 1 to a SETB symbol. 
The form of this instruction is: 

r - T - T - t 

|Name |Operation|Operand j 

»■ - + - + - ) 

| A SETB j SETB |A 0 or a 1,(0) or (1) j 

jsymbol j jor a logical ex- j 

j j jpression enclosed in j 

| j jparentheses | 

t-x-x-J 

The operand may contain a 0 or a 1 or a 
logical expression enclosed in parentheses 
(No explicit binary zeros or ones are 
allowed in parentheses other than in the 
form (0) or (1) .) A logical expression is 
evaluated to determine if it is true or 
false; the SETB symbol in the name entry is 
then assigned the binary value 1 or 0 
corresponding to true or false, 
respectively. 

Note : The parentheses enclosing a logical 
expression do not count towards the 
parenthesis level limit. 
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A logical expression consists of one 
term or a logical combination of terms. 

The terms that may be used alone or in 
combination with each other are arithmetic 
relations, character relations, and SETB 
symbols. The logical operators used to 
combine the terms of an expression are AND, 
OR, and NOT. 

A logical expression may not contain two 
terms in succession. A logical expression 
may contain two operators in succession 
only if the first operator is either AND or 
OR and the second operator is NOT. A 
logical expression may begin with the 
operator NOT. It may not begin with the 
operators AND or OR. 

An arithmetic relation consists of two 
arithmetic expressions connected by a 
relational operator. A character relation 
consists of two character strings connected 
by a relational operator. The relational 
operators are EQ (equal), NE (not equal) , 

LT (less than) , GT (greater than) , Le (less 
than or equal), and GE (greater than or 
equal) . 

Any expression that may be used in the 
operand of a SETA instruction, may be used 
as an arithmetic expression in the operand 
of a SETB instruction. Anything that may 
be used in the operand of a SETC 
instruction, may be used as a character 
string in the operand of a SETB 
instruction. This includes substring and 
type attribute notations. The maximum size 
of the character values that can be 
compared is 127 characters. If the two 
character values are of unequal length, 
then the shorter one will always compare 
less than the longer one, regardless of the 
characters present. 

The relational and logical operators 
must be immediately preceded and followed 
by at least one blank or other special 
character. Each relation may or may not be 
enclosed in parentheses. If a relation is 
not enclosed in parentheses, it must be 
separated from the logical operators by at 
least one blank or other special character. 

The following are valid operand fields 
of SETB instructions: 

1 

(SAREA+2 GT 29) 

('AB%4 * EQ 'SALPHA') 

(T'SABC NE TSXYZ) 

(T* 6P12 EQ 'F') 

(SAREA+2 GT 29 OR SB) 

(NOT SB AND SAREA+X'2D' GT 29) 

(* SC'EQ * MB') 

The following are invalid operand fields 
of SETB instructions: 


SB (not enclosed in parentheses) 

(T* SP12 EQ 'F' SB) 

(two terms in succession) 

('ABX4* EQ 'ALPHA' NOT SB) 

(the NOT operator must be preceded by 
AND or OR) 

(AND T'SP12 EQ 'F') 

(expression begins with AND) 


Evaluation of Logical Expressions 


The following procedure is used to evaluate 
a logical expression in the operand field 
of a SETB instruction: 

1. Each term (i.e., arithmetic relation, 
character relation, or SETB symbol) is 
evaluated and given its logical value 
(true or false) . 

2. The logical operations are performed 
moving from left to right. However, 
NOTs are performed before ANDs, and 
ANDs are performed before ORs. 

3. The computed result is the value 
assigned to the SETB symbol in the 
name field. 

The logical expression in the operand of 
a SETB instruction may contain one or more 
sequences of logically combined terms that 
are enclosed in parentheses. A sequence of 
parenthesized terms may appear within 
another parenthesized sequence. 

The following are examples of SETB 
instruction operands that contain 
parenthesized sequences of terms. 

(NOT (SB AND 6AREA+X'2D' GT 29)) 

(SB AND (T'SP12 EQ'F'OR SB) 

The parenthesized portion or portions of 
a logical expression are evaluated before 
the rest of the terms in the expression are 
evaluated. If a sequence of parenthesized 
terms appears within another parenthesized 
sequence, the innermost sequence is 
evaluated first. 

Logical expressions may have only five 
levels of parentheses. Subscripting, 
substring notation, and logical expression 
nesting count when determining the level of 
parentheses. The parentheses surrounding 
the SETB operand do not count. A counter 
is maintained for each statement and is 
increased by one for each occurrence of a 
variable symbol and an operation entry. 

The maximum value this counter may attain 
is 35. See Appendix H. 





© 
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AIF-Conditional Branch 


The logical value assigned to a SETE symbol 
is used for the SETE symbol appearing in 
the operand of an AIF instruction or 
another SETB instruction. 


The AIF instruction is used to alter 
conditionally the sequence in which source 
program statements are processed by the 
assembler. The typical form of this 
instruction is: 


If a SETB symbol is used in the operand 
of a SETA instruction, or in arithmetic 
relations in the operands of AIF and SETE 
instructions, the binary values 1 (true) 
and 0 (false) are converted to the 
arithmetic values +1 and +0, respectively. 


If a SETB symbol is used in the operand 
of a SETC instruction, in character 
relations in the operands of AIF and SETB 
instructions, or in any other statement, 
the binary values 1 (true) and 0 (false), 
are converted to the character values 1 and 
0 , respectively. 


The following example illustrates these 
rules. It is assumed that L'STO EQ 4 is 
true, and S'STO EQ 0 is false. 


*T- T - 

|Operation|Operand 


I Name 



-t- 

—f- 


j MACRO 

1 

6 NAME 

j MOVE 

j STO,SFROM 


| LCLA 

j 6A1 


{LCLB 

j SB 1,SB2 


jLCLC 

| SCI 

SB1 

j SETB 

j (L'STO EQ 4) 

SB 2 

J SETB 

j (S'STO EQ 0) 

SA1 

j SETA 

j SB 1 

SCI 

j SETC 

| * SB2' 

SNAME 

|ST 

j 2,SAVEAREA 


L 

ST 

L 

MEND 


2, SFROM 6 A 1 
2,STOSC 1 
2,SAVEAREA 


HERE 

HERE 


MOVE 


FIELDA,FIELDS 


ST 

L 

ST 

L 


2,SAVEAREA 
2,FIELDB1 
2,FIELDA0 
2,SAVEAREA 


Because the operand of statement 1 is 
true, SB1 is assigned the binary value 1. 
Therefore, the arithmetic value +1 is 
substituted for SE1 in statement 3. 

Eecause the operand of statement 2 is 
false, SB2 is assigned the binary value 0. 
Therefore, the character value 0 is 
substituted for SE2 in statement 4. 


r- 

|Name 

L 

T - T “ --~ 

(Operation|Cperand 
j. j. 

1 

i 

r t 

| Sequence|AIF 

i 

(A logical expression 

1 

(symbol 

1 

(enclosed in paren- 


jor not 

1 

(theses, immediately 


jused 

1 

j followed by a 


1 

L- 

1 

_L_ 

(sequence symbol 



Any logical expression that may be used 
in the operand of a SETE instruction may be 
used in the operand of an AIF instruction. 
However, the forms 

AIF (0) , sequence symbol and 

AIF (1) , sequence symbol 

are invalid. The sequence symbol in the 
operand must immediately follow the closing 
parenthesis of the logical expression. AIF 
operand entries must not contain explicit 
zeros or ones. 

Note : The parentheses enclosing the 

logical expression do not count toward the 
level limit. 

The logical expression in the operand is 
evaluated to determine if it is true or 
false. If the expression is true, the 
statement named by the sequence symbol in 
the operand is the next statement processed 
by the assembler; however, sequence 
checking is not affected. If the 
expression is false, the next sequential 
statement is processed by the assembler. 

The statement named by the sequence 
symbol may precede or follow the AIF 
instruction. 

If an AIF instruction is in a macro 
definition, then the sequence symbol in the 
operand must appear in the name entry of a 
statement in the definition. If an AIF 
instruction appears outside macro 
definitions, then the sequence symbol in 
the operand must appear in the name entry 
of a statement outside macro definitions. 

The following are valid operands of AIF 
instructions: 

(6 AREA+X' 2D' GT 29) .READER 
(T* 6P12 EQ * F') .THERE 

The following are invalid operands of 
AIF instructions: 
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1 


(T* SAEC NE T'SXYZ) (no sequence symbol) 

.X4F2(no logical expression) 

(T'SABC NE T'SXYZ) .X4F2 (blanks between 
logical expression and sequence symbol) 

The following macro definition may be 
used to generate the statements needed to 
move a fullword fixed-point number from one 
storage area to another. The statements 
will be generated only if the type 
attribute of both storage areas is the 
letter F. 


r-r- 1 - 1 

|Name |Operation)Operand | 

1 -+-f--I 


1 

{MACRO 

1 

1 

| SN 

{MOVE 

|ST,SF 

1 

1 1 

j AIF 

| (T'ST NE T'SF) .END 

i 

2 j 

j AIF 

j (T'ST NE 'F') .END 

i 

3 j 6N 

ST 

{2,SAVEAREA 

i 

1 

{L 

|2,6F 

i 

1 

{ST 

j 2, ST 

i 

1 

|L 

|2,SAVEAREA 

i 

4 j.END 

{MEND 

1 

i 

L _ 

—X- 

_ L --- 

_j 

The 

logical 

expression in the operand 

cf 


statement 1 has the value true if the type 
attributes of the two macro instruction 
operands are not equal. If the type 
attributes are equal, the expression has 
the logical value false. 

Therefore, if the type attributes are 
not equal, statement 4 (the statement named 
by the sequence symbol .END) is the next 
statement processed by the assembler. If 
the type attributes are equal, statement 2 
(the next sequential statement) is 
processed. 

The logical expression in the operand of 
statement 2 has the value true if the type 
attribute of the first macro instruction 
operand is not the letter F. If the type 
attribute is the letter F, the expression 
has the logical value false. 

Therefore, if the type attribute is not 
the letter F, statement 4 (the statement 
named by the sequence symbol .END) is the 
next statement processed by the assembler. 
If the type attribute is the letter F, 
statement 3 (the next sequential statement) 
is processed. 


AGO-Unconditional Branch 


The AGO instruction is used to 
unconditionally alter the sequence in which 
source program statements are processed by 
the assembler. The typical form of this 

jnstriirt-in n i c »_ 


r-7- t- 

{Name {OperationjOperand 


jSequence {AGO {A sequence symbol | 
{symbol orj { j 
jnot used j | j 
i- l -1_.._j 


The statement named by the sequence 
symbol in the operand is the next statement 
processed by the assembler. 


The statement named by the sequence 
symbol may precede or follow the AGO 
instruction. 

If an AGO instruction is part of a macro 
definition, then the sequence symbol in the 
operand must appear in the name entry of a 
statement that is in that definition. If 
an AGO instruction appears outside macro 
definitions, then the sequence symbol in 
the operand must appear in the name entry 
of a statement outside macro definitions. 

The following example illustrates the 
use of the AGO instruction. 

f - 7 - 7 - 

{Name {Operation{Operand { 


j.-4 --f-^ 


1 

(MACRO 

1 


j SNAME 

|MOVE 

j ST,SF 


i i 

j AIF 

j (T* ST EC 'F') .FIRST 


2 j 

j AGO 

j .END 


3{.FIRST 

(AIF 

j (T* ST NE T' SF) .END 


{SNAME 

(ST 

{2,SAVEAREA 


1 

|L 

{2 , SF 


1 

(ST 

(2, ST 


1 

|L 

j2,SAVEAREA 


4 j.END 

(MEND 

1 


t - 

X __ _ 

_ J. - „-- _ 

_J 


Statement 1 is used to determine if the 
type attribute of the first macrc 
instruction operand is the letter F. If 
the type attribute is the letter F, 
statement 3 is the next statement processed 
by the assembler. If the type attribute is 
net the letter F, statement 2 is the next 
statement processed by the assembler. 

Statement 2 is used to indicate to the 
assembler that the next statement to be 
processed is statement 4 (the statement 
named by sequence symbol .END). 


ACTR~Conditional Assembly Loop Counter 

The ACTF instruction is used to limit the 
number of AGO and AIF branches executed 
within a macro definition or within the 

Incriirt GOUoT Cc pITG yj. a ut • 
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A separate ACTR statement may be used in 
each macro definition and in the main 
program. These counters are independent. 

The form of this instruction is: 


Name 

T ' 

1 

-X- 

—- T -— 

Operation)Operand 

X 

Not used. 

t 

1 

ACTR 

r 

(Any valid SETA 

must not 

1 


j expression 

be present 

1 


1 


_x. 




This statement must immediately follow 
any global or local declarations, if any. 
This statement causes a counter to be set 
to the value in its operand. Each time an 
AGO or AIF branch is executed, the counter 
is decremented by one. If the count is 
zero before decrementing, the assembler 
takes cne of two actions: 

1 . If a macro definition is being 
processed, the processing of it and 
any macros above it in a nest is 
terminated, and the next statement in 
the main portion of the program is 
processed. 

2. If the main portion of the program is 
being processed, conditional assembly 
is terminated, and the portion of the 
program generated so far is assembled. 

If an ACTR statement is not given, the 
assumed value of the counter is 150 for the 
E assembler and 4096 for the F assembler. 


ANOP-Assembly No-Operation 

The ANOP instruction facilitates 
conditional and unconditional branching to 
statements named by symbols or variable 
symbols. 

The typical form of this instruction is: 


before the statement and then branch to the 
ANOP instruction. This has the same effect 
as branching to the statement immediately 
after the ANCP instruction. 

The following example illustrates the 
use of the ANOP instruction. 


r 

| Name 

I 

“T- T----- 

|Operation | Operand 

i 

— 1 
1 

_j 

r 

1 

T 

| MACRO 

T 

1 

— 1 

j 6NAME 

|MOVE 

| ST , SF 


1 

jicic 

| STYPE 


1| 

j A IF 

j (T*ST EQ 'F').FTYPE 


2|6 TYPE 

| SETC 

| 'E* 


3 |.FTYPE(ANOP 

1 


4 | SNAME 

|STSTYPE 

| 2,SAVEAREA 


1 

(LSTYPE 

|2,SF 


1 

| STSTYPE 

(2,ST 


1 

|LSTYPE 

j 2,SAVEAREA 


1 

(MEND 

1 


t__ 

-X-- -- 


_J 


Statement 1 is used to determine if the 
type attribute of the first macro 
instruction operand is the letter F. If 
the type attribute is not the letter F, 
statement 2 is the next statement processed 
by the assembler. If the type attribute is 
the letter F, statement 4 should be 
processed next. However, since there is a 
variable symbol (SNAME) in the name field 
cf statement 4, the required sequence 
symbol. (.FTYPE) cannot be placed in the 
name field. Therefore, an ANOP instruction 
(statement 3) roust be placed before 
statement 4. 

Then, if the type attribute of the first 
operand is the letter F, the next statement 
processed by the assembler is the statement 
named by sequence symbol .FTYFE. The value 
of STYPE retains its initial null character 
value because the SETC instruction is not 
processed. Since .FTYPE names an ANOP 
instruction, the next statement processed 
by the assembler is statement 4, the 
statement following the ANOP instruction. 


(Name jOperation!Operand j 

j.- 1 -f--1 

|Sequence|ANOP |Not used, must not J 

(symbol j jbe present j 

i-x-x-J 

If the programmer wants to use an AIF or 
AGO instruction to branch to another 
statement, he must place a sequence symbol 
in the name entry of the statement to which 
he wants to branch. However, if the 
programmer has already entered a symbol cr 
variable symbol in the name entry cf that 
statement, he cannot place a sequence 
symbol in the name entry. Instead, the 
programmer must place an ANOP instruction 


Conditional Assembly Elements 


The following chart summarizes the elements 
that can be used in each conditional 
assembly instruction. Each row in this 
chart indicates which elements can be used 
in a single conditional assembly 
instruction. Each column is used to 
indicate the conditional assembly 
instructions in which a particular element 
can be used. 

The intersection of a column and a row 
indicates whether an element can be used in 
an instruction, and if so, in what fields 
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of the instruction the element can be used. indicates that symbolic parameters can be 
For example, the intersection of the first used in the operand field of SETA 
row and the first column of the chart instructions. 


j Variable Symbols 

j.- T - 

SET Symbols 



-1-T-T-T-T-7-T-T-t-1 

| S.P. I SETA I SETB j SETC j T* j L• j S 1 j 1 * j K• J N* j S.S. j 


I ANOP I I I I I I I I I I I K 

j.-1-4—.—j--+•--j-—4—4-j-—4—4—4— 

| ACTR |0 |0 jo | 0 3 j jo JO jo j 0 j C j 

L_X_X_J._X_X_X__X_J_X-J_ I _ 


1 Only in character relations 

2 Only in arithmetic relations 

3 Only if one to eight decimal digits 

Abbreviations 

N is Name L' is Length Attribute K* is Count Attribute 

0 is Operand S* is Scaling Attribute N* is Number Attribute 

S.P. is Symbolic 1' is Integer Attribute S.S. is Sequence Symbol 

Parameter 
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Section 10. Additional Features 



The additional features of the assembler The following example illustrates the 

language allow the programmer to: use of the MEXIT instruction. 


1. 

Terminate processing of a macro 

r 

T 

— T — - — 

- 1 


definition. 

| Name 

|Operation|Operand 

1 



[ - 

~+~ - - 

—+- 

- 1 

2. 

Generate error messages. 

1 

jMACRO 

1 




j SNAME 

j MOVE 

j ST, SF 


3. 

Define global SET symbols. 

1| 

j AIF 

j (T' ST EQ 'F') .OK 




2 j 

|MEXIT 

1 


4. 

Define subscripted SET symbols. 

| 3|.0K 

jANOP 

1 




j 6NAME 

ST 

j 2,SAVEAREA 


5. 

Use system variable symbols. 

I 

j L 

1 2 , SF 




1 

ST 

1 2 , ST 


6. 

Prepare keyword and mixed-mode macro 

1 

l L 

j 2,SAVEAREA 



definitions and write keyword and 

1 

j MEND 

1 



mixed-mode macro instructions. 

L 

-X _ 

_x _ _ 

-j 



MEXIT--Macro Definition Exit 


The MEXIT instruction is used to indicate 
to the assembler that it should terminate 
processing of a macro definition. The 
typical form of this instruction is: 

r- t-t- -i 

|Name |Operation|Operand j 

I--+-+--H 

|Sequence |MEXIT |Not used, j 

jsymbol orj jmust not be j 

j not used j j present j 

i - x - x -J 


Statement 1 is used to determine if the 
type attribute of the first macro 
instruction operand is the letter F. If 
the type attribute is the letter F, the 
assembler processes the remainder of the 
macro definition starting with statement 3. 
If the type attribute is not the letter F, 
the next statement processed by the 
assembler is statement 2. Statement 2 
indicates to the assembler that it is to 
terminate processing of the macro 
definition. 


MNOTE Statement 


The MEXIT instruction may only be used 
in a macro definition. 

If the assembler processes an MEXIT 
instruction that is in a macro definition 
corresponding to an outer macro 
instruction, the next statement processed 
by the assembler is the next statement 
outside macro definitions. 


The MNOTE instruction may be used to 
generate a message and to indicate what 
error severity code, if any, is to be 
associated with the message. The severity 
code is for the programmer's information 
only and is not used by the DOS assembler 
or control program. The typical form of 
this instruction is: 


If the assembler processes an MEXIT 
instruction that is in a macro definition 
corresponding to a second or third level 
macro instruction, the next statement 
processed by the assembler is the next 
statement after the second or third level 
macro instruction in the macro definition, 
respectively. 


MEXIT should not be confused with MEND. 
MEND indicates the end of a macro 
definition. MEND must be the last 
statement of every macro definition, 
including those that contain one or more 
MEXIT instructions. 


Name 

*t r - 

j Operation J Operand 

Sequence 

T 

j MNOTE 

T 

|See examples below. 

symbol orj 

1 

not used 

1 

I 


-X _ 

x _ 


The operand entry of the MNOTE assembler 
instruction may be written in one of the 
following forms: 

1. severity code, 'message' 

2. ,'message* 
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3. 


'message* 


For 2 and 3 above, the severity code is 
assumed to be one. 


The MNOTE instruction may only be used 
in a macro definition. Variable symbols 
may be used to generate the MNOTE mnemonic 
operation code, the severity code 
indicator, and the message. 

The resulting severity code indicator 
may be a decimal integer 0 to 255, blank, 
or an asterisk. The integers indicate the 
severity of the error. (0 is the least 
severe; 255 is the most severe) . If the 
severity code indicator is blank or 
omitted, 1 is assumed. If the severity 
code is an asterisk, the MNOTE is not 
considered an error message. Messages can 
be generated with substitution using 
variable symbols. 


Statement 1 is used to determine if the 
type attributes of both macro instruction 
operands are the same. If they are, 
statement 2 is the next statement processed 
by the assembler. If they are not, 
statement 5 is the next statement processed 
by the assembler. Statement 5 causes an 
error message—8,TYPE NOT SAME—to be 
printed in the soux'ce program listing. 



Statement 2 is used to determine if the 
type attribute of the first macro 
instruction operand is the letter F. If 
the type attribute is the letter F, 
statement 3 is the next statement processed 
by the assembler. If the attribute is not 
the letter F, statement 6 is the next 
statement processed by the assembler. 
Statement 6 causes an error message—8,TYPE 
NOT F—to be printed in the source program 
listing. Statement 4 is an MNOTE which is 
not treated as an error message. 


The MNOTE statement appears in the 
listing with a statement number at the 
point where it was generated. It appears 
even if PRINT NOGEN is specified. If the 
severity code indicator was an integer or a 
blank, this statement number is placed in a 
list of statement numbers of MNOTE and 
other error statements near the end of the 
assembly listing. If the severity code is 
an asterisk, the statement number is not 
placed in this list. 


Global and Local Variable Symbols 


The following are local variable symbols: 

1. Symbolic parameters. 

2. Local SET symbols. 

3. System variable symbols. 

Global SET symbols are the only global 
variable symbols. 



Since the message portion of the MNOTE 
operand is enclosed in apostrophes, two 
apostrophes must be used to represent a 
single apostrophe. Any variable symbols 
used in the message operand are replaced by 
values assigned to them. Two ampersands 
must be used to represent a single 
ampersand that is not part of a variable 
symbol. 

The following example illustrates the 
use of the MNOTE instruction. 

r- t-T' 



Name 

. 

j Operation j Operand 

_L ± 


■ 

T 

T 



|MACRO 

I 


SNAME 

j MOVE 

j ST, SF 

1 


| AIF 

j (T* ST NE T* SF) -Ml 

2 


| AIF 

j (T* ST NE *F*) .M2 

3 

SNAME 

ST 

j 2,SAVEAREA 



j L 

| 2 , SF 



ST 

J 2 , ST 



j L 

j 2,SAVEAREA 

4 


|MNOTE 

j*,*MOVE GENERATED 



JMEXIT 

1 

5 

.Ml 

j MNOTE 

|8,'TYPE NOT SAME* 



j MEXIT 

1 

6 

.M2 

j MNOTE 

|8,'TYPE NOT F' 



j MEND 

1 


l-X----X 


The GBLA, GBLB, and GBLC instructions 
define global SET symbols, just as the 

LCLA, LCLB, and LCLC instructions define 
the SET symbols described in Section 9. 
Hereinafter, SET symbols defined by LCLA, 

LCLB, and LCLC instructions will be called 
local SET symbols. 

Global SET symbols may communicate 
values between statements in one or more 
macro definitions and statements outside 
macro definitions. However, local SET 
symbols communicate values between 
statements in the same macro definition, or 
between statements outside macro 
-j definitions. 

I 

| If a local SET symbol is defined in two 

j or more macro definitions, or in a macro 
| definition and outside macro definitions, 

j the SET symbol is considered to be a 

j different SET symbol in each case. 

J However, a global SET symbol is the same 

| SET symbol each place it is defined. 

I 

| A SET symbol must be defined as a global 

j SET symbol in each macro definition in 
j which it is to be used as a global SET 
| symbol. A SET symbol must be defined as a 
j global SET symbol outside macro 
• J definitions, if it is to be used as a 


100 Part 3: Conditional Assembly and Macro Facilities 










Page of GC24-3414-9 
Revised Nov. 31, 1972 
By TNL- GN33-8157 


global SET symbol outside macro 
definitions. 

If the same SET symbol is defined as a 
global SET symbol in one or more places, 
and as a local SET symbol elsewhere, it is 
considered the same symbol wherever it is 
defined as a global SET symbol, and a 
different symbol wherever it is defined as 
a local SET symbol. 


All GBLA, GBLB, and GBLC instructions in 
a macro definition must appear before all 
LCLA, LCLB, and LCLC instructions in that 
macro definition. All GBLA, GBLB, and GBLC 
instructions outside macro definitions must 
appear before all LCLA, LCLB, and LCLC 
instructions outside macro definitions. 
Comments statements are the only statements 
which may be interspersed with the 
definitions of local and global SET 
symbols. 


DEFINING LOCAL AND GLOBAL SET SYMBOLS 


USING GLOBAL AND LOCAL SET SYMBOLS 


Local SET symbols are defined when they 
appear in the operand entry of an LCLA, 
LCLB, or LCLC instruction. These 
instructions are discussed in Section 9 
under "Defining SET Symbols." 

Global SET symbols are defined when they 
appear in the operand entry of a GBLA, 

GBLB, or GBLC instruction. The typical 
forms of these instructions are: 


Name 

T" 

1 

- 4 -- 

Operation | Operand 

. _ j 

Not used. 

T 

1 

GBLA, |0ne or more 

must not 

1 

GBLB, or jvariable 

be present 

I 

GBLC j symbols that are 


1 

| to be used as 


1 

(global SET 


1 

(symbols, sepa- 


1 

j rated by commas 

T .... . m _ 

.X. 

- JL___ _ _ 


The GBLA, GBLB, and GBLC instructions 
define global SETA, SETB, and SETC symbols, 
respectively, and assign the same initial 
values as the corresponding types of local 
SET symbols. However, a global SET symbol 
is assigned an initial value by only the 
first GBLA, GBLB, or GBLC instruction 
processed in which the symbol appears. 
Subsequent GBLA, GBLB, or GBLC instructions 
processed by the assembler do not affect 
the value assigned to the SET symbol. 

The programmer should not define any 
global SET symbols whose first four 
characters are SSYS. 


The following examples illustrate the use 
of global and local SET symbols. Each 
example consists of two parts. The first 
part is an assembler language source 
program. The second part shows the 
statements that would be generated by the 
assembler after it processed the statements 
in the source program. 

Example 1 : This example illustrates how 
the same SET symbol can be used to 
communicate (1) values between statements 
in the same macro definitions, and (2) 
different values between statements outside 
macro definitions. 


r- t-t- 1 


Name 

.. _ 

Operation j Operand 

L J. 

■ 


T 


MACRO 

1 

SNAME 

LOADA 

1 


LCLA 

j SA 

SNAME 

LR 

(15,SA 

SA 

SETA 

j SA+1 


MEND 

1 

1 


LCLA 

( 

j SA 

FIRST 

LOADA 

1 


LR 

|15,SA 


LOADA 

1 


LR 

(15,SA 


END 

|FIRST 

1 .... 

1 

T 

T 

FIRST 

LR 

(15,0 


LR 

(15,0 


LR 

1 15,0 


LR 

(15,0 


END 

j FIRST 


L- X _J-J 


If a GBLA, GBLB, or GBLC instruction is 
part of a macro definition, it must 
immediately follow the prototype statement, 
or another GBLA, GBLB, or GBLC instruction. 
GBLA, GBLB, and GBLC instructions outside 
macro definitions must appear after all 
macro definitions in the source program, 
before all conditional assembly 
instructions and PUNCH and REPRO statements 
outside macro definitions, and before the 
first control section of the program. 


SA is defined as a local SETA symbol in 
a macro definition (statement 1) and 
outside macro definitions (statement 4) . 

SA is used twice within macro definition 
(statements 2 and 3) and twice outside 
macro definitions (statements 5 and 6) . 

Since SA is a local SETA symbol in the 
macro definition and outside macro 
definitions, it is one SETA symbol in the 
macro definition, and another SETA symbol 
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outside macro definitions. Therefore, 
statement 3 (which is in the macro 
definition) does not affect the value used 
for £A in statements 5 and 6 (which are 
outside macro definitions) . 


£A is defined as a local SETA symbol in 
two different macro definitions (statements 
1 and 4). £A is used twice within each 
macro definition (statements 2, 3, 5, and 
6 ) . 


Example 2 : This example illustrates how a 
SET symbol can be used to communicate 
values between statements that are part of 
a macro definition and statements outside 
macro definitions. 


r - T -T-1 

{Name |Operation|Operand | 


h- 

-t- 

—t- 

1 

1 

j MACRO 

1 


j £NAME 

j LOADA 

1 

1 

1 1 

| GBLA 

j £A 


2 j £NAME 

j LR 

j15,£A 


3 j £A 

J SETA 

| £A+ 1 


1 

1 

j MEND 

l 

1 

1 


1 

4 1 

1 

| GBLA 

1 

| £A 


FIRST 

j LOADA 

1 


5 j 

J LR 

j15,£A 


1 

|LOADA 

1 


6 j 

j LR 

j15,£A 


1 

JEND 

jFIRST 


L 

i 

.I. ... .. 

J 

r- 

-+ 

T 

1 

j FIRST 

| LR 

1 15,0 


1 

j LR 

I 15,1 


1 

j LR 

1 15,1 


I 

j LR 

I 15,2 


I 

END 

j FIRST 


L_ 

-X__ 

X - 

_ J 


£A is defined as a global SETA symbol in 
a macro definition (statement 1) and 
outside macro definitions (statement 4) . 

£A is used twice within the macro 
definition (statements 2 and 3) and twice 
outside macro definitions (statements 5 and 
6 ) . 


Since £A is a global SETA symbol in the 
macro definition and outside macro 
definitions, it is the same SETA symbol in 
both cases. Therefore, statement 3 (which 
is in the macro definition) affects the 
value used for £A in statements 5 and 6 
(which are outside macro definitions). 


Since £A is a local SETA symbol in each 
macro definition, it is one SETA symbol in 
one macro definition, and another SETA 
symbol in the other macro definition. 
Therefore, statement 3 (which is in one 
macro definition) does not affect the value 
used for £A in statement 5 (which is in the 
other macro definition). Similarly, 
statement 6 does not affect the value used 
for £A in statement 2. 


r - T - T - 

| Name |Operation f Operand 

|--+ - + - 

MACRO 
LOADA 
LCLA 
LR 
SETA 
MEND 


£NAME 

£NAME 

£A 


£A 


FIRST 


MACRO 

LOADB 

LCLA 

LR 

SETA 

MEND 

LOADA 

LOADB 

LOADA 

LOADB 

END 


£A 

15, £A 
£A+ 1 


£A 

15,£A 
£A+ 1 


FIRST 


FIRST 


LR 

LR 

LR 

LR 

END 


15,0 

15,0 

15,0 

15,0 

FIRST 


Example 3 : This example illustrates how 
the same SET symbol can be used to 
communicate: (1) values between statements 

in one macro definition, and (2) different 
values between statements in a different 
macro definition. 
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Example 4 : This example illustrates how a 
SET symbol can be used to communicate 
values between statements that are part of 
two different macro definitions. 


"T-T- 

j Operation|Operand 


[Name 


SNAME 

SNAME 

SA 


SA 


FIRST 


MACRO 

LOADA 

GBLA 

LR 

SETA 

MEND 

MACRO 

LOADB 

GBLA 

LR 

SETA 

MEND 

LOADA 

LOADB 

LOADA 

LOADB 

END 


SA 

15,SA 
SA+1 


SA 

15,SA 
SA+1 


FIRST 


FIRST 


LR 

LR 

LR 

LR 

END 


15,0 
15, 1 

15.2 

15.3 
FIRST 


Section 10 


Additional Features 102.1 









£A is defined as a global SETA symbol in 
two different macro definitions (statements 
1 and 4). £A is used twice within each 
macro definition (statements 2. 3. 5, and 

6 ) . 


Since £A is a global SETA symbol in each 
macro definition, it is the same SETA 
symbol in each macro definition. 

Therefore, statement 3 (which is in cne 
macro definition) affects the value used 
for £A in statement 5 (which is in the 
other macro definition). Similarly, 
statement 6 affects the value used for £A 
in statement 2. 


Example 5 : This example illustrates how 
the same SET symbol can be used tc 
communicate: (1) values between statements 

in two different macro definitions, and (2) 
different values between statements cutside 
macrc definitions. 


r-r- t-1 

| Name |Operation!Operand | 


r- 

-t- 

- 

- 1 

1 

|MACRO 

1 


|£NAME 

|LOADA 

1 


1 1 

|GBLA 

| £A 


2 j £NAME 

J LR 

| 15,£A 


3 j £A 

| SETA 

| £A+ 1 


1 

I 

| MEND 

l 

1 

1 


1 

1 

i 

|MACRO 

1 

1 


1 

j LOADB 

1 


4 j 

j GBLA 

j £A 


5 1 

j LR 

j 15,£A 


6 j £A 

j SETA 

j £A+ 1 


1 

j MEND 

1 


1 

7 1 

I 

] LCLA 

1 

| £A 


jFIRST 

j LOADA 

1 


1 

|LOADB 

! 


8 | 

j LR 

j 15,£A 


1 

|LOADA 

I 


1 

j LOADB 

1 


9 | 

j LR 

|15,£A 


1 

j END 

jFIRST 


L 

i. . 

t . 

1 

1 

T 

r-- 

1 

jFIRST 

j LR 

I 15,0 


1 

j LR 

1 15,1 


1 

j LR 

I 15,0 


1 

1 LR 

I 15,2 


1 

j LR 

I 15,3 


I 

j LR 

I 15,0 


I 

j END 

j FIRST 


l 

-X-- 

_ X___ 

-- _ J 


£A is defined as a global SETA symbol in 
two different macro definitions (statements 
1 and 4) , but it is defined as a lccal SETA 
symbol outside macro definitions (statement 
7). £A is used twice within each macro 
definition and twice outside macro 
definitions (statements 2, 3, 5, 6, 8, and 

9) • 


Since £A is a global SETA symbol in each 
macrc definition, it is the same SETA 
symbol in each macro definition. However, 
since £A is a local SETA symbol outside 
macro definitions, it is a different SETA 
symbol cutside macro definitions. 

Therefore, statement 3 (which is in one 
macro definition) affects the value used 
for £A in statement 5 (which is in the 
ether macro definition), but it does not 
affect the value used for £A in statements 
8 and 9 (which are outside macro 
definitions) . Similarly, statement 6 
affects the value used for 6A in statement 
2, but it does not affect the value used 
fer £A in statements 8 and 9. 


SUBSCRIPTED SET SYMBOLS 


Eoth global and local SET symbols may be 
defined as subscripted SET symbols. The 
local SET symbols defined in Section 9 were 
all nonsubscripted SET symbols. 

Subscripted SET symbols provide the 
programmer with a convenient way to use one 
SET symbol plus a subscript to refer to 
many arithmetic, binary, or character 
values. 

A subscripted SET symbol consists of a 
SET symbol immediately followed by a 
subscript that is enclosed in parentheses. 
The subscript may be any arithmetic 
expression that is allowed in the operand 
of a SETA statement in the range of 1 to 
the specified dimension. 

Only five levels of parentheses are 
permitted in a SETA or SETE operand. 

The following are valid subscripted SET 
symbols. 

£READER (17) 

£A23456 (£S4) 

£4F2 (25 + £A2) 

The following are invalid subscripted 
SET symbols. 

£X4F2 (no subscript) 

(25) (no SET symbol) 

£X4F2 (25) (subscript does not 

immediately follow 
SET symbol) 

Defining Subscripted SET Symbol s. If the 
programmer wants to use a subscripted SET 
symbol, he must write in a GBLA, GBLB, 

GBLC, LCLA, LCLE, or LCLC instruction, a 
SET symbol immediately followed by an 
unsigned decimal integer enclosed in 
parentheses. The decimal integer, called a 
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dimension, indicates the number cf SET 
variables associated with the SET symbol. 
Every variable associated with a SET symbol 
is assigned an initial value that is the 
same as the initial value assigned to the 
corresponding type of nonsufcscripted SET 
symbol. 

If a subscripted SET symbol is defined 
as global, the same dimension must be used 
with the SET symbol each time it is defined 
as global. 

The maximum dimension that can be used 
with a SETA, SETE, or SETC symbol is 255. 


A subscripted SET symbol may be used 
only if the declaration was subscripted. A 
ncnsubscripted SET symbol may be used only 
if the declaration had no subscript. 

The following statements define the 
global SET symbols SSEOX, SWEOX, and SPSW, 
and the local SET symbol STSW. SSEOX has 
50 arithmetic variables associated with it, 
SWEOX has 20 character variables, SPSW and 
STSW each have 230 binary variables. 


r- t-1-1 

| Name |OperationJOperand | 


h— 

-+- — 


--1 

1 

JGBLA 

| SSBOX (50) 

1 

1 

| GBLC 

j SWBOX (20) 

1 

1 

| GBLB 

j SPSW (230) 

1 

1 

JLCLB 

j STSW (230) 

1 


X 


__J 


U sing Subscripted SET Symbols . After the 
programmer has associated a number of SET 
variables with a SET symbol, he may assign 
values to each of the variables and use 
them in other statements. 

If the statements in the previous 
example were part of a macro definition, 
(and SA was defined as a SETA symbol in the 
same definition) , the following statements 
could be part of the same macro definition. 


r- 1 - 1 - 

(Name JOperation|Operand 


h 


1 |6A |SETA 

2 j SPSW (SA) | SETB 

3 j STSW (9) | SETE 

41 |A 

5 | I CL I 

l-JL_ 


|5 

j (6 LT 2) 
j (SPSW (SA) ) 

| 2 ,=F' SSEOX (45) ' 
j AREA,C* SWBOX (17) 


Statement 1 assigns the arithmetic value 
5 to the nonsubscripted SETA symbol SA. 
Statements 2 and 3 then assign the binary 
value 0 to subscripted SETB symbols SPSW (5) 
and STSW (9) , respectively . Statements 4 
and 5 generate statements that add the 
value assigned to SSEOX (45) to general 
register 2, and compare the value assigned 


tc SWEOX (17) to the value stored at AREA, 
respectively. 


System Variable Symbols 


System variable symbols are local variable 
symbcls that are assigned values 
automatically by the assembler. There are 
fcur system variable symbols: SSYSNEX, 
SSYSECT, SSYSLIST, and SSYSPARM. System 
variable symbols may be used in the name, 
operation and operand entries of statements 
in macro definitions, but not in statements 
cutside macro definitions with the 
exception of SSYSFARK. They may not be 
defined as symbolic parameters cr SET 
symbcls, nor may they be assigned values by 
SETA, SETB, and SETC instructions. 


SSYSNEX—MACRO INSTRUCTION INDEX 


The system variable symbol SSYSNEX may be 
ccmbined with other characters to create 
unique names for statements generated from 
the same model statement. 

SSYSNDX is assigned the four-digit 
number 0001 for the first macro instruction 
processed by the assembler, and it is 
incremented by one for each subsequent 
inner and outer macro instruction 
processed. 

If SSYSNEX is used in a model statement, 
SETC or MNCTE instruction, or a character 
relation in a SETE or AIF instruction, the 
value substituted for SSYSNEX is the 
fcur-digit number of the macro instruction 
being processed, including leading zercs. 

If SSYSNDX appears in arithmetic 
expressions (e.g., in the operand of a SETA 
instruction) , the value used for SSYSNEX is 
an arithmetic value. 

Throughout one u se of a macr o 
definition, the v al ue of S SYSND X may be 
considered a constant, independent of any 
inner macro instr uct ion in that d efinition . 

The example in the next column 
illustrates these rules. It is assumed 
that the first macro instruction processed, 
OUTER 1, is the 106th macro instruction 
processed by the assembler. 

Statement 7 is the 106th iracrc 
instruction processed. Therefore, SSYSNEX 
is assigned the number 0106 for that macro 
instruction. The number 0106 is 
substituted for SSYSNEX when it is used in 
statements 4 and 6. Statement 4 is used to 
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assign the character value 0106 to the SETC 
symbol SNDXNUM. Statement 6 is used to 
create the unique name E0106. 


r-r-r- 

|Naire | Operation (Operand 

[ -f-f- 


1 

j MACRO 

I 

1 

j INNER 1 

1 

1 

j GBLC 

| SNDXNUM 

1 | A6SYSNDX 

j SR 

12,5 

1 

j CR 

(2,5 

2 | 

| BE 

|BSNDXNUM 

3 | 

1 B 

| ASSYSNDX 

1 

j MEND 

i 

I 

1 

1 

1 

1 

j MACRO 

1 

1 

j SNAME 

J OUTER 1 

1 

1 

| GBLC 

1SNDXNUM 

4 j SNDXNUM 

j SETC 

j * SSYSNDX* 

|SNAME 

| SR 

J 2,4 

1 

| AR 

1 2,6 

5| 

INNER 1 

1 

6 (BSSYSNDX 

1 $ 

| 2,=F*1000* 

1 

j MEND 

1 

i 

i 

i .. 

r 

T 

r - 

7 jALPHA 

j OUTER 1 

1 

8 j BETA 

J OUTER 1 

1 

i . .... 

L 

i 

r - ~ 

T 

r — 

(ALPHA 

| SR 

(2,4 

1 

( AR 

1 2,6 

(A0107 

| SR 

1 2,5 

1 

| CR 

(2,5 

1 

BE 

| B0 106 

1 

B 

| A0107 

(B0106 

1 s 

| 2,=F*1000* 

j BETA 

( SR 

(2,4 

1 

j AR 

(2,6 

JA0 109 

j SR 

(2,5 

1 

( CR 

(2,5 

1 

BE 

(B0108 

1 

1 B 

|A0109 

j B0108 

1 s 

| 2,=F*1000' 

i___ 

.L- 

_i.-- 

Statement 

5 is the 

107th macro 

instruction 

processed. 

Therefore, SSYSNDX 

is assigned 

the number 

0107 for that macro 


instruction. The number 0107 is 
substituted for SSYSNDX when it is used in 
statements 1 and 3. The number 0106 is 
substituted for the global SETC symbol 
SNDXNUM in statement 2. 

Statement 8 is the 108th macro 
instruction processed. Therefore,each 
occurrence of SSYSNEX is replaced by the 
number 0108. For example, statement 6 is 
used to create the unique name E0108. 

When statement 5 is used to process the 
108th macro instruction, statement 5 
becomes the 109th macro instruction 
processed. Therefore, each occurrence of 
SSYSNDX is replaced by the number 0109. 

For example, statement 1 is used to create 
the unique name A0109. 


SSYSECT—CURRENT CCNTRCL SECTION 


The system variable symbol SSYSECT may be 
used to represent the name of the control 
section in which a macro instruction 
j appears. For each inner and outer macro 
■j instruction processed by the assembler, 
SSYSECT is assigned a value that is the 
name of the control section in which the 
macro instruction appears. 


When SSYSECT is used in a macro 
definition, the value substituted for 
SSYSECT is the name of the last CSECT, 
DSECT, or START statement that occurs 
before the macro instruction. If no named 
CSECT, DSECT, or START statements occur 
before a macro instruction, SSYSECT is 
assigned a null character value for that 
macro instruction. 


CSECT or DSECT statements processed in a 
macro definition affect the value of 
-j SSYSECT for any subsequent inner macro 
instructions in that definition, and for 
any other outer and inner macro 
-| instructions. 


Throughout the use of a macro 
definition, the value of SSYSECT may be 
considered a constant, independent of any 
CSECT or DSECT statements or inner macro 
instructions in that definition. SSYSECT 
will take on the name of the last CSECT, 
DSECT, or START statement regardless of 
whether or not that statement is correct. 

The next example illustrates these 
rules. 

Statement 8 is the last CSECT, CSECT, or 
START statement processed before statement 
9 is processed. Therefore, SSYSECT is 
assigned the value MAINFRCG for macro 
instruction OUTER1 in statement 9. 

MAINFROG is substituted for SSYSECT when it 
appears in statement 6. 

Statement 3 is the last CSECT, ESECT, or 
START statement processed before statement 
4 is processed. Therefore, SSYSECT is 
assigned the value CSCUT1 for macro 
instruction INNER in statement 4. CSOUT 1 
is substituted for SSYSECT when it appears 
in statement 2. 

Statement 1 is used to generate a CSECT 
statement for statement 4. This is the 
last CSECT, DSECT, or START statement that 
appears before statement 5. Therefore, 
SSYSECT is assigned the value INA for macro 
instruction INNER in statement 5. INA is 
substituted for SSYSECT when it appears in 
statement 2. 
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(Name 


9 

10 


T- T- 

J OperationJOperand 

f-f- 

MACRO 


glNCSECT 


CSOUT1 


J.- 

MAINPROG 


MAINPROG 


CSOUT1 


INA 


INB 


INNER 

CSECT 

DC 

MEND 

MACRO 
OUTER 1 
CSECT 
DS 

INNER 

INNER 

DC 

MEND 

MACRO 

OUTER2 

EC 

MEND 


CSECT 

DS 

OUTER 1 
OUTER2 


CSECT 

DS 

CSECT 

DS 

CSECT 

DC 

CSECT 

DC 

DC 

DC 


glNCSECT 


A (gSYSECT) 


100C 

INA 

INB 

A (SSYSECT) 


A (gSYSECT) 


200C 


200C 

100C 

A (CSOUT 1) 

A (INA) 

A (MAINPROG) 
A (INB) 


Statement 1 is used to generate a CSECT 
statement for statement 5. This is the 
last CSECT, DSECT, or START statement that 
appears before statement 10. Therefore, 
gSYSECT is assigned the value INB for macro 
instruction OUTER2 in statement 10= INB is 
substituted for gSYSECT when it appears in 
statement 7. 


6SYSLIST—ACCESSING POSITIONAL OPERANDS IN 
A MACRO INSTRUCTION 


The system variable symbol gSYSLIST 
provides the programmer with an alternative 
to symbolic parameters for referring to 
positional macro instruction operands. 

gSYSLIST may be coded, along with all 
other variable symbols (including symbolic 
parameters), in the model statements of any 
macro definition. (In the Tape Operating 
System (TOS) , gSYSLIST cannot be used in 
macro definitions having any keyword 
symbolic parameters). When used to access 
a macro instruction operand, gSYSLIST is 
written with one or two subscripts: 


1. gSYSLIST (m) will access the positional 
macro instruction operand 
corresponding to the positional 
operand subscript m. The programmer, 
therefore, does not have to define a 
positional parameter in the macro 
definition prototype statement. This 
allows him to access a different 
number of positional macro instruction 
operands in different calls to the 
same macro. The positional operand 
subscript m can be a self-defining 
term or an absolute expression, but 
its value must be a positive, whole 
number within the range of the number 
of operands permitted in a macro 
instruction. 

Note : A null string will be generated in 

place of gSYSLIST (m) if: 


a. m=0 

b. m is greater than the number of 
positional operands in the macro 
instruction. 

c. m accesses a specifically omitted 
operand. 

The model statement containing 
gSYSLIST (m) will be flagged in error 
if: 

a. m is negative. 

b. m is greater than 100 (for the E 
Assembler) . 

m is greater than 200 (for the F 
Assembler) . 

2. gSYSLIST (m,n) accesses elements of 
positional operand sublists in macro 
instructions. The positional operand 
subscript ro fulfills the same function 
as above, and is subjected to the same 
restrictions. The positional operand 
sublist subscript n refers to the 
sublist element of the positional 
operand in a macro instruction 
corresponding to ro. Again positional 
parameters need not have been 
previously defined in the macro 
definition prototype statement. 

Note : A null string will be generated in 
place of gSYSLIST (m,n) , m > 0 and otherwise 
within its allowable range, if: 


a. n=0 

b. n is greater than the number of 
elements in the positional operand 
sublist in the macro instruction. 

c. n accesses a specifically omitted 
operand sublist element. 
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The type, length, scaling, integer, and 
count attributes of 6SYSLISTS (m) and 
SSYSLIST (m,n) and the number attributes of 
SSYSLIST (m) and SSYSLIST may be used in 
conditional assembly instructions. 
Attributes are discussed in Section 9 under 
"Attributes." 


N'SSYSLIST refers to the total number of 
positional operands in the macro 
instruction statement. When none have been 
called, N'SSYSLIST has the value 0. If, 
however, some positional operands in the 
macro instruction are specifically emitted 
(by means of commas), N*SSYSLIST will 
include the omitted operands in its count 
(see MAC2 and MAC3 in the examples below). 

A sublist is considered to be one operand 
(see MAC3 below) : 


jMacro Instructions 


|N*SSYSLIST] 


|MAC 1: 
j K1=DS 
1 

|MAC2: 
j ,,K1=DC 

I 

J MAC 3: 

j FULL,,F, (*1*, , 2', , 3') ,KL=DC 



N'SSYSLIST (m) refers to the total number 
of elements in the macro instruction 
operand sublist corresponding to the 
positional operand subscript m. If the mth 
operand is omitted, N*SSYSLIST (n) is 0; if 
the mth operand is not a sublist, 

N* SSYSLIST (m) is 1. 

In the MAC3 macro instruction above: 


N*SSYSLIST (4) 

is 

3 

N* SSYSLIST (5) 

is 

0 

N' SSYSLIST (2) 

is 

0 

N' SSYSLIST (1) 

is 

1 


SSYSPARM - System Parameter for Conditional 
Assembly 


(EOS Assembler D, 14K variant, only) 

The system parameter SSYSPARM allows the 
programmer to control conditional assembly 
flew and source code generation through the 
use of a parameter specified in a job 
control statement. Thus, the programmer 
can modify the output of an assembly 
without changing the source code itself. 
This can be convenient if an installation 
keeps sections of source code on tape or in 
a source statement library (SYSSLfi) . 


The system parameter behaves like a 
global SETC symbol except that its value 
can be set only through the OPTION job 
control statement. It cannot be modified 
during assembly. SSYSPARM can be coded 
inside as well as outside macro 
definitions. SSYSPARM can be used only if 
SPARM=YES was specified in the STDJC macro 
when the system was generated. 

A value to the system parameter is 
assigned with a keyword parameter in the 
OPTION job control card: 

// OPTION ...,SYSPARM—* string *,... 

The system parameter will get the value of 
the string within the quotes, which must be 
a character string, 0-8 bytes long. It 
may consist of any combination of EBCDIC 
characters. A single quote in the string 
must be represented by two on the OPTION 
card. If no SSYSPARM value is specified, 
the value of the system parameter will be a 
null string. 


Keyword Macro Definitions and Instructions 


Keyword macro definitions provide the 
programmer with an alternate way of 
preparing macro definitions. 

A keyword macro definition enables a 
programmer to reduce the number of operands 
in each macro instruction that corresponds 
to the definition, and to write the 
operands in any order. 

The macro instructions that correspond 
to the macro definitions described in 
Section 7 (hereinafter called positional 
macro instructions and positional macro 
definitions, respectively) require the 
operands to be written in the same order as 
the corresponding symbolic parameters in 
the operand entry of the prototype 
statement. 

In a keyword macro definition, the 
programmer can assign values to any 
symbolic parameters that appear in the 
operand of the prototype statement. The 
value assigned to a symbolic parameter is 
substituted for the symbolic parameter, if 
the programmer does not write anything in 
the operand of the macro instruction to 
correspond to the symbolic parameter. 

When a keyword macro instruction is 
written, the programmer need only write one 
operand for each symbolic parameter whose 
value he wants to change. 

Keyword macro definitions are prepared 
the same way as positional macro 
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definitions, except that the prototype 
statement is written differently, and 
SSYSL1ST may not be used in the definition. 
The rules for preparing positional macro 
definitions are in Section 7. 


I-IT-T-1 

(Name (Operation{Operand | 

i-4-4--i 

j 6N (MOVE (6R=2,€A=S,€T=,SF= j 

l-J.-J.-J 


KEYWORD PROTOTYPE 


The typical form of this statement is: 


iName 


I-- 

|A symbolic 
j parameter 
j or not used| 

I 
I 


Operation j Operand 


A symbol (One to 100 (200 
(for F assembler) 
(operands of the 
(form described 
(below, separated 
j by commas. 

_JL_ 


Each operand must consist of a symbolic 
parameter, immediately followed by an equal 
sign and optionally followed by a value. 
Nested keywords are not permitted. 

A value that is part of an operand must 
immediately follow the equal sign. 

Anything that may be used as an operand 
in a macro instruction except variable 
symbols, may be used as a value in a 
keyword prototype statement. The rules for 
forming valid macro instruction operands 
are detailed in Section 8. 


The following are valid keyword 
prototype operands. 


6LOOP2=SYMBOL 
€S4==F' 4096 1 


The following are invalid keyword 
prototype operands. 


CARDAREA 
6TYPE 
6TWO =123 


6AREA= X'18 9A' 


(no symbolic parameter) 
(no equal sign) 

(equal sign does net 
immediately fellow 
symbolic parameter) 

(value does not 
immediately follow equal 
sign) 


The following keyword prototype 
statement contains a symbolic parameter in 
the name entry and four operand entries in 
the operand. Tho first two operand entries 
contain values. The mnemonic operation 
code is MOVE. 


KEYWORD MACRO INSTRUCTION 


After a programmer has prepared a keyword 
macro definition he may use it by writing a 
keyword macro instruction. 

The typical form of a keyword macro 
instruction is: 

r- T -if-•-1 

(Name (Operation|Operand | 


(A symbol,(Mnemonic jzero to 100 operands j 
(sequence (operation! (200 for F Assembler)j 
jsymbol (code (of the form described! 

(or not ( (below, separated by j 

(used j (commas j 

i-x-x-J 

Each operand consists of a keyword 
immediately followed by an equal sign and 
an optional value. Nested keywords are not 
permitted. Anything that may be used as an 
operand in a positional macro instruction 
may be used as a value in a keyword macro 
instruction. The rules for forming valid 
positional macro instruction operands are 
detailed in Section 8. 

A keyword consists of one through seven 
letters and digits, the first of which roust 
be a letter. 

The keyword part of each keyword macro 
instruction operand must correspond to one 
of the symbolic parameters that appears in 
the operand of the keyword prototype 
statement. A keyword corresponds to a 
symbolic parameter if the characters of the 
keyword are identical to the characters of 
the symbolic parameter that follow the 
ampersand. 

The following are valid keyword macro 
instruction operands. 

LOOP 2=SYMBOL 
S4==F'4096' 

TO= 


The following are invalid keyword macro 
instruction operands. 


€X4F2=0 (2,3) 
CARDAREA=A+2 
= (TO (8) , (FROM)) 


(keyword does not begin 
with a letter) 

(keyword is more than 
seven characters) 

(no keyword) 
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The operands in a keyword macro 
instruction may be written in any order. 

If an operand appeared in a keyword 
prototype statement, a corresponding 
operand does not have to appear in the 
keyword macro instruction. If an operand 
is omitted, the comma that would have 
separated it from the next operand need not 
be written. 

The following rules are used to replace 
the symbolic parameters in the statements 
of a keyword macro definition. 

1. If a symbolic parameter appears in the 
name entry of the prototype statement, 
and the name entry of the macro 
instruction contains a symbol, the 
symbolic parameter is replaced by the 
symbol. If the name entry of the 
macro instruction is unused or 
contains a sequence symbol, the 
symbolic parameter is replaced by a 
null character value. 

2. If a symbolic parameter appears in the 
operand of the prototype statement, 
and the macro instruction contains a 
keyword that corresponds to the 
symbolic parameter, the value assigned 
to the keyword replaces the symbolic 
parameter. 


symbol, SN is replaced by HERE in statement 

2 . 


r- t-t-- 

I Name |Operation j Operand 


I—- 

! 

1 j SN 

2 | SN 

3| 

*1 

5i 

I 

I" 


j MACRO 
| MOVE 
j ST 

j ST 
|L 

j MEND 


I 

j SR=2,SA=S,ST=,SF= 
j SR,SA 
j SR,SF 
j SR,ST 
|SR,SA 

I 


6 j HERE |MOVE 

[ -+- 

j HERE j ST 

I !L 

I 1ST 

S |L 

L_X_ 


j T=FA,F=FB,A=THERE 

|2,THERE 
| 2,FB 
I 2,FA 
j2,THERE 


Since ST appears in the operand of 
statement 1, and statement 6 contains the 
keyword (T) that corresponds to ST, the 
value assigned to T (FA) replaces ST in 
statement 4. Similarly, FB and THERE 
replace SF and SA in statement 3 and in 
statements 2 and 5, respectively. Note 
that the value assigned to SA in statement 
6 is used instead of the value assigned to 
SA in statement 1. 


3. If a symbolic parameter was assigned a 
value by a prototype statement, and 
the macro instruction does not contain 
a keyword that corresponds to the 
symbolic parameter, the standard value 
assigned to the symbolic parameter 
replaces the symbolic parameter. 
Otherwise, the symbolic parameter is 
replaced by a null character value. 


Note : If a symbolic parameter value is a 

self-defining term the type attribute 
assigned to the value is the letter N. If 
a symbolic parameter value is omitted the 
type attribute assigned to the value is 
theletter 0. All other values are assigned 
the type attribute U. 


Since SR appears in the operand of 
statement 1, and statement 6 does not 
contain a corresponding keyword, the value 
assigned to SR (2) , replaces SR in 
statements 2, 3, 4, and 5. 


Operand Sublists . The value assigned to a 
keyword and the value assigned to a 
symbolic parameter may be an operand 
sublist. Anything that may be used as an 
operand sublist in a positional macro 
instruction may be used as a value in a 
keyword macro instruction and as a value in 
a keyword prototype statement. The rules 
for forming valid operand sublists are 
detailed in Section 8 under "Operand 
Sublists." 


The following keyword macro definition, 
keyword macro instruction, and generated 
statements illustrate these rules. 

Statement 1 assigns the values 2 and S 
to the symbolic parameters SR and SA, 
respectively. Statement 6 assigns the 
values FA, FB, and THERE to the keywords T, 
F, and A, respectively. The symbol HERE is 
used in the name entry of statement 6. 

Since a symbolic parameter (SN) appears 
in the name entry of the prototype 
statement (statement 1) , and the 
corresponding characters (HERE) of the 
macro instruction (statement 6) are a 


Keyword Inner Macro Instructions . Keyword 
and positional inner macro instructions may 
be used as model statements in either 
keyword or positional macro definitions. 


Mixed-Mode Macro Definitions and 
Instructions 

Mixed-mode macro definitions allow the 
programmer to use the features of keyword 
and positional macro definitions in the 
same macro definition. 
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Mixed-mode macro definitions are 
prepared the same way as positional macro 
definitions, except that the prototype 
statement is written differently. (In TOS 
SYSLIST may not be used in the definition.) 
The rules for preparing positional macro 
definitions are in Section 7. 


The operand consists of two parts. The 
first part corresponds to the positional 
prototype operands. This part of the 
operand is written in the same way that the 
operand entry of a positional macro 
instruction is written. The rules for 
writing positional macro instructions are 
in Section 8. 



MIXED-MODE PROTOTYPE 

The typical form of this statement is: 


"T-T- 

| Operation|Operand 


I Name 


b -x-- 


|A symbolic 
j parameter 
|or not used| 


—--.-i 

A symbol (Two to 100 (200 
jfor F assembler) 
joperands of the 
(form described 
(below, separated 
jby commas 

-x- 


The second part of the operand 
corresponds to the keyword prototype 
operands. This part of the operand is 
written in the same way that the operand 
entry of a keyword macro instruction is 
written. The rules for writing keyword 
macro instructions are described under 
"Keyword Macro Instruction." 


The following mixed-mode macro 
definition, mixed-mode macro instruction, 
and generated statements illustrate these 
facilities. 


The operands must be valid operands of 
positional and keyword prototype 
statements. All the positional operands 
must precede the first keyword operand. 

The rules for forming positional operands 
are discussed in Section 7 under "Macro 
Instruction Prototype." The rules for 
forming keyword operands are discussed 
under "Keyword Prototype." 

The following sample mixed-mode 
prototype statement contains three 
positional operands and two keyword 
operands. 

r -n*-T- 1 

(Name J Operation|Operand ( 

h- - —+-•>-+--i 

|SN |MOVE jSTY,£P,SR,STO=,SF= J 

l_X_X_J 


MIXED-MODE MACRO INSTRUCTION 


The typical form of a mixed-mode macro 
instruction is: 

r-r- t- 1 

(Name |Operation(Operand ( 


(A symbol,jMnemonic (Zero to 100 operands j 
|sequence |operation] (200 for F Assembler) j 
j symbol j code j of the form described j 
(or not j (below, separated by j 
jused j (commas j 
i—__x-x-J 


r- T - T - 

(Name J Operation|Operand 

f- 



T-— 

(MACRO 

T 

1 

SN 

(MOVE 

j STY,SP,SR,STO=,SF= 

£N 

j STSTY 

(SR,SAVE 

(LSTY 

j SR,SPSF 


|STSTY 

j SR,SPSTO 


(LSTY 

(SR,SAVE 



—X- ---- --- 


b 

2(HERE 

b 


! MOVE 


|H,,2,F=FB,TO=FA 


1 — 


HERE j STH 

(2,SAVE 

(LH 

(2,FB 

(STH 

| 2,FA 

(LH 

j2,SAVE 

__x_ 

X 


The prototype statement (statement 1) 
contains three positional operands (£TY,SP, 
j and SR) and two keyword operands (STO and 
SF). In the macro instruction (statement 
2) the positional operands are written in 
the same order as the positional operands 
in the prototype statement (the second 
operand is omitted) . The keyword operands 
are written in an order that is different 
from the order of keyword operands in the 
prototype statement. 


Mixed-mode inner macro instructions may 
be used as model statements in mixed-mode, 
keyword, and positional macro definitions. 
Keyword and positional inner macro 
instructions may be used as model 
statements in mixed-mode macro definitions. 
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o 


Conditional Assembly Compatibility 


Macro definitions prepared for use with the 
other IBM System/360 Operating System 
assemblers having macro language facilities 
may be used with the DOS/TOS assembler 
provided that all SET symbols are declared 


in an appropriate LOLA, LCLB, LCLC, GBLA r 
GBLB, or GBLC statement. The A1FB and AGOB 
instructions are processed by the DOS/TOS 
assembler the same way that the AIF and AGO 
instructions are processed. AIFB and AGOB 
instructions cause the count set up by the 
ACTR instruction to be decremented exactly 
like the AGO and AIF instructions. 
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Appendix A. Extended Binary Coded Decimal 
Interchange Code (EBCDIC) 


The following charts and the associated key 
show the bit configurations of the 256 
possible codes (characters) of the Extended 
BCD Interchange Code- To write a given 
character in binary, locate the character 
on the chart. The top row of coordinates 
equates to bit positions 0 and 1, the 
second row to bit positions 2 and 3, and 
the left row of coordinates equates to bit 
positions 4, 5, 6 and 7. 


Character A equals: 

top row—11 (bit positions 0, 1) 

2nd row—00 (bit positions 2, 3) 

left row—0001 (bit positions 4, 5, 6 
and 7) 

Therefore, character A is shown as: 
1100 0001 

Character $ equals: 

top row—01 (bit positions 0, 1) 

2nd row—01 (bit positions 2,. 3) 

left row—1011 (bit positions 4, 5, 6 
and 7) 


Therefore, character $ is shown as: 


0101 1011 


The coordinates on the bottom of the 
chart are the three zone punches required 
to reproduce the character in a punched 
card; the coordinates on the right side 
represent the numeric punches. 


Examples : 


Character A = bottom row—12 punch 
right row—1 punch 

Therefore, character A is shown by a 12 
and a 1 punch in the same card column. 

Character $ = bottom row--11 punch 

right row—8 and 3 punches 

Therefore, character $ is shown by 11, 
8, and 3 punches in the same card column. 

There are fifteen exceptions to the 
punching equated to bit positions. These 
exceptions are shown in the chart by 
circled numbers 1 through 15, and the 
substituted punching is shown below the 
chart under "Exceptions." 
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Control Characters 


PF 

Punch Off 

BS 
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Appendix B. Hexadecimal-Decimal Number Conversion Table 


The table in this appendix provides for 
direct conversion of decimal and 
hexadecimal numbers in these ranges: 

r-1-1 

|Hexadecimal |Decimal | 


jOOO to FFF |0000 to 4095 j 

l-.L_._J 

Decimal numbers (0000-4095) are given 
within the 5-part table. The first two 
characters (high-order) of hexadecimal 
numbers (000-FFF) are given in the lefthand 
column of the table; the third character 
(x) is arranged across the top of each part 
of the table. 

To find the decimal equivalent of the 
hexadecimal number 0C9 f look for 0C in the 
left column, and across that row under the 
column for x = 9. The decimal number is 
0201 . 

To convert from decimal to hexadecimal, 
look up the decimal number within the table 
and read the hexadecimal number by a 
combination of the hex characters in the 
left column, and the value for x at the top 
of the column containing the decimal 
number. 


For example, the decimal number 123 has 
the hexadecimal equivalent of 07B; the 
decimal number 1478 has the hexadecimal 
equivalent of 5C6. 


For numbers outside the range of the 
table, add the following values to the 
table 


I-T-1 

|Hexadecimal (Decimal | 

I-+--I 


1000 

1 4096 

2000 

| 8192 

3000 

| 12288 

4000 

| 16384 

5000 

| 20480 

6000 

| 24576 

7000 

| 28672 

8000 

| 32768 

9000 

| 36864 

A000 

| 40960 

BOOO 

| 45056 

cooo 

j 49152 

D000 

( 53248 

E000 

( 57344 

F000 

| 61440 
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1670 

1671 

1672 

1673 

1674 

1675 

1676 

1677 

1678 

1679 

69x 

1680 

1681 

1682 

1683 

1684 

1685 

1686 

1687 

1688 

1689 

1690 

1691 

1692 

1693 

1694 

1695 

6Ax 

1696 

1697 

1698 

1699 

1700 

1701 

1702 

1703 

1704 

1705 

1706 

1707 

1708 

1709 

1710 

1711 

6Bx 

1712 

1713 

1714 

1715 

1716 

1717 

1718 

1719 

1720 

1721 

1722 

1723 

1724 

1725 

1726 

1727 

6Cx 

1728 

1729 

1730 

1731 

1732 

1733 

1734 

1735 

1736 

1737 

1738 

1739 

1740 

1741 

1742 

1743 

6Dx 

1744 

1745 

1746 

1747 

1748 

1749 

1750 

1751 

1752 

1753 

1754 

1755 

1756 

1757 

1758 

1759 

6Ex 

1760 

1761 

1762 

1763 

1764 

1765 

1766 

1767 

1768 

1769 

1770 

1771 

1772 

1773 

1774 

1775 

6Fx 

1776 

1777 

1778 

1779 

1780 

1781 

1782 

1783 

1784 

1785 

1786 

1787 

1788 

1789 

1790 

1791 

70x 

1792 

1793 

1794 

1795 

179 6 

1797 

1798 

1799 

1800 

1801 

1802 

1803 

1804 

1805 

1806 

1807 

71x 

1808 

1809 

1810 

1811 

1812 

1813 

1814 

1815 

1816 

1817 

1818 

1819 

1820 

1821 

1822 

1823 

72x 

1824 

1825 

1826 

1827 

1828 

1829 

1830 

1831 

1832 

1833 

1834 

1835 

1836 

1837 

1838 

1839 

73x 

1840 

1841 

1842 

1843 

1844 

1845 

1846 

1847 

1848 

1849 

1850 

1851 

1852 

1853 

1854 

1855 

74x 

1856 

1857 

1858 

1859 

1860 

1861 

1862 

1863 

1864 

1865 

1866 

1867 

1868 

1869 

1870 

1871 

75x 

1872 

1873 

1874 

1875 

1876 

1877 

1878 

1879 

1880 

1881 

1882 

1883 

1884 

1885 

1886 

1887 

76x 

1888 

1889 

1890 

1891 

1892 

1893 

1894 

1895 

1896 

1897 

1898 

1899 

1900 

1901 

1902 

1903 

77x 

1904 

1905 

1906 

1907 

1908 

1909 

1910 

1911 

1912 

1913 

1914 

1915 

1916 

1917 

1918 

1919 

78x 

1920 

1921 

1922 

1923 

1924 

1925 

1926 

1927 

1928 

1929 

1930 

1931 

1932 

1933 

1934 

1935 

79x 

1936 

1937 

1938 

1939 

1940 

1941 

1942 

1943 

1944 

1945 

1946 

1947 

1948 

1949 

1950 

1951 

7 Ax 

1952 

1953 

1954 

1955 

1956 

1957 

1958 

1959 

1960 

1961 

1962 

1963 

1964 

1965 

1966 

1967 

7Bx 

1968 

1969 

1970 

1971 

1972 

1973 

1974 

1975 

1976 

1977 

1978 

1979 

1980 

1981 

1982 

1983 

7Cx 

1984 

1985 

1986 

1987 

1988 

1989 

1990 

1991 

1992 

1993 

1994 

1995 

1996 

1997 

1998 

1999 

7Dx 

2000 

2001 

2002 

2003 

2004 

2005 

2006 

2007 

2008 

2009 

2010 

2011 

2012 

2013 

2014 

2015 

7 Ex 

2016 

2017 

2018 

2019 

2020 

2021 

2022 

2023 

2024 

2025 

2026 

2027 

2028 

2029 

2030 

2031 

7Fx 

2032 

2033 

2034 

2035 

2036 

2037 

2038 

2039 

2040 

2041 

2042 

2043 

2044 

2045 

2046 

2047 
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X = 0 

1 

2 

3 

4 

5 

6 

7 

8 

9 

A 

B 

C 

D 

E 

F 

COx 

3072 

3073 

3074 

3075 

3076 

3077 

3078 

3079 

3080 

3081 

3082 

3083 

3084 

JUOD 

3086 

3087 

Clx 

3088 

3089 

3090 

3091 

3092 

3093 

3094 

3095 

3096 

3097 

3098 

3099 

3100 

3101 

3102 

3103 

C2x 

3104 

3105 

3106 

3107 

3108 

3109 

3110 

3111 

3112 

3113 

3114 

3115 

3116 

3117 

3118 

3119 

C3x 

3120 

3121 

3122 

3123 

3124 

3125 

3126 

3127 

3128 

3129 

3130 

3131 

3132 

3133 

3134 

3135 

C4x 

3136 

3137 

3138 

3139 

3140 

3141 

3142 

3143 

3144 

3145 

3146 

3147 

3148 

3149 

3150 

3151 

C5x 

3152 

3153 

3154 

3155 

3156 

3157 

3158 

3159 

3160 

3161 

3162 

3163 

3164 

3165 

3166 

3167 

C6x 

3168 

3169 

3170 

3171 

3172 

3173 

3174 

3175 

3176 

3177 

3178 

3179 

3180 

3181 

3182 

3183 

C7x 

3184 

3185 

3186 

3187 

3188 

3189 

3190 

3191 

3192 

3193 

3194 

3195 

3196 

3197 

3198 

3199 

C8x 

3200 

3201 

3202 

3203 

3204 

3205 

3206 

3207 

3208 

3209 

3210 

3211 

3212 

3213 

3214 

3215 

C9x 

3216 

3217 

3218 

3219 

3220 

3221 

3222 

3223 

3224 

3225 

3226 

3227 

3228 

3229 

3230 

3231 

CAx 

3232 

3233 

3234 

3235 

3236 

3237 

3238 

3239 

3240 

3241 

3242 

3243 

3244 

3245 

3246 

3247 

CBx 

3248 

3249 

3250 

3251 

3252 

3253 

3254 

3255 

3256 

3257 

3258 

3259 

3260 

3261 

3262 

3263 

CCx 

3264 

3265 

3266 

3267 

3268 

3269 

3270 

3271 

3272 

3273 

3274 

3275 

3276 

3277 

3278 

3279 

CDx 

3280 

3281 

3282 

3283 

3284 

3285 

3286 

3287 

3288 

3289 

3290 

3291 

3292 

3293 

3294 

3295 

CEx 

3296 

3297 

3298 

32 99 

3300 

3301 

3302 

3303 

3304 

3305 

3306 

3307 

3308 

3309 

3310 

3311 

CFx 

3312 

3313 

3314 

3315 

3316 

3317 

3318 

3319 

3320 

3321 

3322 

3323 

3324 

3325 

3326 

3327 

DOx 

3328 

3329 

3330 

3331 

3332 

3333 

3334 

3335 

3336 

3337 

3338 

3339 

3340 

3341 

3342 

3343 

Dlx 

3344 

3345 

3346 

3347 

3348 

3349 

3350 

3351 

3352 

3353 

3354 

3355 

3356 

3357 

3358 

3359 

D2x 

3360 

3361 

3362 

3363 

3364 

3365 

3366 

3367 

3368 

3369 

3370 

3371 

3372 

3373 

3374 

3375 

D3x 

3376 

3377 

3378 

3379 

3380 

3381 

3382 

3383 

3384 

3385 

3386 

3387 

3388 

3389 

3390 

3391 

D4x 

3392 

3393 

3394 

3395 

3396 

3397 

3398 

3399 

3400 

3401 

3402 

3403 

3404 

3405 

3406 

3407 

D5x 

3408 

3409 

3410 

3411 

3412 

3413 

3414 

3415 

3416 

3417 

3418 

3419 

3420 

3421 

3422 

3423 

D6x 

3424 

3425 

3426 

3427 

3428 

3429 

3430 

3431 

3432 

3433 

3434 

3435 

3436 

3437 

3438 

3439 

D7x 

3440 

3441 

3442 

3443 

3444 

3445 

3446 

3447 

3448 

3449 

3450 

3451 

3452 

3453 

3454 

3455 

D8x 

3456 

3457 

3458 

34 59 

3460 

3461 

3462 

3463 

3464 

3465 

3466 

3467 

3468 

3469 

3470 

3471 

D9x 

3472 

3473 

3474 

3475 

3476 

3477 

3478 

3479 

3480 

3481 

3482 

3483 

3484 

3485 

34 86 

3487 

DAx 

3488 

3489 

3490 

3491 

3492 

3493 

3494 

3495 

3496 

3497 

3498 

3499 

3500 

3501 

3502 

3503 

DBx 

3504 

3505 

3506 

3507 

3508 

3509 

3510 

3511 

3512 

3513 

3514 

3515 

3516 

3517 

3518 

3519 

DCx 

3520 

3521 

3522 

3523 

3524 

3525 

3526 

3527 

3528 

3529 

3530 

3531 

3532 

3533 

3534 

3535 

ODx 

3536 

3537 

3538 

3539 

3540 

3541 

3542 

3543 

3544 

3545 

3546 

3547 

3548 

3549 

3550 

3551 

OEx 

3552 

3553 

3554 

3555 

3556 

3557 

3558 

3559 

3560 

3561 

3562 

3563 

3564 

3565 

3566 

3567 

DFx 

3568 

3569 

3570 

3571 

3572 

3573 

3574 

3575 

3576 

3577 

3578 

3579 

3580 

3581 

3582 

3583 

EOx 

3584 

3585 

3586 

35 87 

3588 

3589 

3590 

3591 

3592 

3593 

3594 

3595 

3596 

3597 

3598 

3599 

El X 

3600 

3601 

3602 

3603 

3604 

3605 

3606 

3607 

3608 

3609 

3610 

3611 

3612 

3613 

3614 

3615 

E2x 

3616 

3617 

3618 

3619 

3620 

3621 

3622 

3623 

3624 

3625 

3626 

3627 

3628 

3629 

3630 

3631 

E3x 

3632 

3633 

3634 

3635 

3636 

3637 

3638 

3639 

3640 

3641 

3642 

3643 

3644 

3645 

3646 

3647 

E4x 

3648 

3649 

3650 

3651 

3652 

3653 

3654 

3655 

3656 

3657 

3658 

3659 

3660 

3661 

3662 

3663 

E5x 

3664 

3665 

3666 

3667 

3668 

3669 

3670 

3671 

3672 

3673 

3674 

3675 

3676 

3677 

3678 

3679 

E6x 

3680 

3681 

3682 

3683 

3684 

3685 

3686 

3687 

3688 

3689 

3690 

3691 

3692 

3693 

3694 

3695 

E7x 

3696 

3697 

3698 

3699 

3700 

3701 

3702 

3703 

3704 

3705 

3706 

3707 

3708 

3709 

3710 

3711 

E8x 

3712 

3713 

3714 

3715 

3716 

3717 

3718 

3719 

3720 

3721 

3722 

3723 

3724 

3725 

3726 

3727 

E9x 

3728 

3729 

3730 

3731 

3732 

3733 

3734 

3735 

3736 

3737 

3738 

3739 

3740 

3741 

3742 

3743 

EAx 

3744 

3745 

3746 

3747 

3748 

3749 

3750 

3751 

3752 

3753 

3754 

3755 

3756 

3757 

3758 

3759 

EBx 

3760 

3761 

3762 

3763 

3764 

3765 

3766 

3767 

3768 

3769 

3770 

3771 

3772 

3773 

3774 

3775 

ECx 

3776 

3777 

3778 

3779 

3780 

3781 

3782 

3783 

3784 

3785 

3786 

3787 

3788 

3789 

3790 

3791 

EDx 

3792 

3793 

3794 

37 95 

3796 

3797 

3798 

3799 

3800 

3801 

3802 

3803 

3804 

3805 

3806 

3607 

EEx 

3808 

3809 

3810 

3811 

3812 

3813 

3814 

3815 

3816 

3817 

3818 

3819 

3820 

3821 

3822 

3823 

EFx 

3824 

3825 

3826 

3827 

3828 

3829 

3830 

3831 

3832 

3833 

3834 

3835 

3836 

3837 

3838 

3839 

FOx 

3840 

3841 

3842 

3843 

3844 

3845 

3846 

3847 

3848 

3849 

3850 

3851 

3352 

3853 

3854 

3855 

Fix 

3856 

3857 

3858 

3859 

3860 

3861 

3862 

3863 

3864 

3865 

3866 

3867 

3868 

3869 

3870 

3671 

F2x 

3872 

3873 

3874 

3875 

3876 

3877 

3878 

3879 

3880 

3881 

3882 

3883 

3884 

3885 

3886 

3887 

F3x 

3888 

3889 

3890 

3891 

3892 

3893 

3894 

3895 

3896 

3897 

3898 

3899 

3900 

3901 

3902 

3903 

F4x 

3904 

3905 

3906 

3907 

3908 

3909 

3910 

3911 

3912 

3913 

3914 

3915 

3916 

3917 

3918 

3919 

F5x 

3920 

3921 

3922 

3923 

3924 

3925 

3926 

3927 

3928 

3929 

3930 

3931 

3932 

3933 

3934 

3935 

F6x 

3936 

3937 

3938 

3939 

3940 

3941 

3942 

3943 

3944 

3945 

3946 

3947 

3948 

3949 

3950 

3951 

F7x 

3952 

3953 

3954 

3955 

3956 

3957 

3958 

3959 

3960 

3961 

3962 

3963 

3964 

3965 

3966 

3967 

F8x 

3968 

3969 

3970 

3971 

3972 

3973 

3974 

3975 

3976 

3977 

3978 

3979 

3980 

3981 

3962 

3983 

F9x 

3984 

3985 

3986 

3987 

3988 

3989 

3990 

3991 

3992 

3993 

3994 

3995 

3996 

3997 

3998 

3999 

FAX 

4000 

4001 

4002 

4003 

4004 

4005 

4006 

4007 

4008 

4009 

4010 

4011 

4012 

4013 

4014 

4015 

FBx 

4016 

4017 

4018 

4019 

4020 

4021 

4022 

4023 

4024 

4025 

4026 

4027 

4028 

4029 

4030 

4031 

FCx 

4032 

4033 

4034 

4035 

4036 

4037 

4038 

4039 

4040 

4041 

4042 

4043 

4044 

4045 

4046 

4047 

FDx 

4048 

4049 

4050 

4051 

4052 

4053 

4054 

4055 

4056 

4057 

4058 

4059 

4060 

4061 

4062 

4063 

FEx 

4064 

4065 

4066 

4067 

4068 

4069 

4070 

4071 

4072 

4073 

4074 

4075 

4076 

4077 

4078 

4079 

FFx 

4080 

4081 

4082 

4083 

4084 

4085 

4086 

4087 

4088 

4089 

4090 

4091 

4092 

4093 

4094 

4095 
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Appendix C. Machine Instruction Format 


BASIC MACHINE FORMAT 


ASSEMBLER CFERAND 
FIELD FORMAT 


AFFLICAELE INSTRUCTIONS 


r-1—r—i 

I 8 | 4 | 4 | 

|Operation| | | 

| Code j R1jR2 J 

L_JL_X._J 

f - T - T --j 

I 8 | 4 | 4 | 

{Operation} j J 

| Code |M1|R2| 

L_X-X_J 

r-1- t— i 

I 8 | 4 | | 

|Operation! | | 

| Code }R1| | 

L-X_ JL _J 

r-1-1 

I 8 | 8 | 

|Operation! | 

J Code | I | 

l -j.-j 


R1, R2 


M1,R2 


All RR instructions 
except ECR, SPM, and SVC 


(See Notes 1, 6, 8, and 9) 


r-T-T-T- T -1 

I 8 |4 |4 |4 |12! 

|Operation| j j | | 

j Code j R1j X2 j B2 j D2 j 

L-X_X_X_X_J 

f - T - T - T - T -1 

| 8 | 4 J 4 |4 12 J 

jOperation! 1111 
| Code |M1j X2 j B2|D2} 

L_X-X_X_X-J 


R1,D2 (X2,B2) 

R1,D2 (,B2) 

R1, S2 (X2) 

R1, S2 

M1,D2, (X2,B2) 

Ml ,D2 (,B2) 

Ml, S2 (X2) 

Ml, S2 

(See Notes 1, 6, 8, and 9) 


All RX instructions 
except EC 


r - 

—r— t— 

T-T-1 

1 

1 

1 8 

1 4 | 4 

1 4 1 121 

1 

1 

1 Operation! j 

! 1 ! 

|R1,R3,D2 (B2) 

j EXH , EXXE , LM , STM , LCTL , 

| Code 

f R11 R31 B21 D21 

j R1 ,R3, S2 

jSTCTL 

i__ 

-_X-X— 

-X_X-J 

1 

1 

1 

1 

r-* 

—r—r— 

T-T-1 

1 

1 

1 

1 

1 8 

1 4 J 

14 !12! 

I 

[ 

| Operation! | 

1 1 I 

JR1,D2 (B2) 

|All shift instructions 

J Code 

1R11 

| B2J D2| 

|R1 , S2 

1 

L _ -- 

—X-X— 

■ X_ J _J 

! 

1 

r- - — - 

—T—T— 

T-T-1 

I 

1 

1 8 

1 4 | 4 

1 4 I 121 

1 

1 


jOperation! j j | | 

J Code j R1j M3 j B21D2 J 

L-X-X-X-X-1 


R1,M3,D2 (B2) 

R1,M3,S2 

(See Notes 1-3, 7, 8, 
and 9) 


ICM,STCM,CLM 





























BASIC MACHINE FORMAT 


ASSEMBLER OPERAND 
FIELD FORMAT 


APPLICABLE INSTRUCTIONS 


r- t- r— i-1 

I 8 | 8 14 | 121 

|Operation| | | J 

| Code | 12 |B1|D1| 

L_X_X i_I 


jOperation! 

| Code | 

L-X. 


- T *—1-1 

1 4 | 12] 

I I 1 

| B 11 D 1 j 

-X-X_I 


D1 (B1) ,12 
SI,12 


D 1 (B1) 
SI 


r - r —, 

I 16 |4 |12| 

J Two-byte 1 j | 

jOperation Code |B1|D1| 
t-- j j 1 


D1 (B1) 

SI 

(See Notes 2, 3, 6 f 7, 8, 
and 10) 


All SI instructions 
except those listed 
for other SI formats 


LPSW,SSM,TIO,TCH 

TS 


SCK,STCK,STIDP,STIDC, 
SIO, SIOF, HIO, HDV 


r- T—t—1-1—*1-1-1 

| 8 |4 | 4 | 4 | 12| 4 | 12| 

|Operation | | | | | | | 

| Code |L1]L2|B1|D1|B2|D2| 

L___X_i-i-X-X_J_I 


C-T-T-1-1-r-1 

| 8 I 8 I 4 I 121 4 I 121 

|Operation | I I I I I 

| Code J L j B11D1 j B2 j D21 

L-X_X_ i _J_X_I 

f - T - r — T -,- 1 -!-1 

I 8 |4 |4 |4 j12|4 |12| 

1Operation| | | | | | | 
| Code |L1|I3|B1|D1|B2|D2| 

L _X_X_X_1_X_J_I 


Dl (L1,B1) ,D2 (L2,B2) 
SI (LI) ,S2 (L2) 


D 1 (L, B1) , D2 (B2) 

SI (L) ,S2 

(See Notes 2, 3, 5, and 7) 

Dl (LI ,B1) ,D2 (B2) ,13 
SI (LI) ,S2,I3 
S1,S2,I3 

(See Notes 2, 3, 5, 6, 7, 
and 10) 


PACK,UNPK,MVO,AP, 
CP,DP,MP,SP,ZAP 


NC,OC,XC,CLC,MVC,MVN, 
MVZ,TR,TRT,ED,EDMK 
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Notes for Appendix C . 


1. R1, R2, and R3 are absolute expressions that specify general or floating-point 
registers. The general register numbers are 0 through 15; floating-point register 
numbers are 0, 2, 4, and 6. 

2. D1 and D2 are absolute expressions that specify displacements. A value of 0-4095 
may be specified. 

3. B1 and B2 are absolute expressions that specify base registers. Register numbers 
0-15. 



4. X2 is an absolute expression that specifies an index register. Register numbers 
are 0-15. 

5. L, LI, and L2 are absolute expressions that specify field lengths. An L expression 
can specify a value of 1-256. LI and L2 expressions can specify a value of 1-16. 

In all cases, the assembled value will be one less than the specified value. 

6. I, 12, and 13 are absolute expressions that provide immediate data. The value of I 

and 12 may be 0-255. The value of 13 may be 0-9. 

7. SI and S2 are absolute or relocatable expressions that specify an address. 

8. RR, RS, and SI instruction fields that are blank under BASIC MACHINE FORMAT are not 
examined during instruction execution. The fields are not written in the symbolic 
operand, but are assembled as binary zeros. 

9. Ml and M3 specify a 4-bit mask. 

10. In IBM System/370 the HIO, HDV, SIO, and SIOF operation codes occupy one byte and 
the low order bit of the second byte. In all other systems the HIO and SIO 
operation codes occupy only the first byte of the instruction. 
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Appendix D. Machine Instruction Mnemonic Operation Codes 


Figure 14 lists all machine operation codes 
and their associated assembler instructions 
and mnemonics in operation code order. 

Figure 16 contains the mnemonic 
operation codes for all machine 
instructions that can be represented in 
assembler language, including extended 
mnemonic operation codes. It is in 
alphabetic order by instruction. Indicated 
for each instruction are both the mnemonic 
and machine operation codes, explicit and 
implicit operand formats, program 
interruptions possible, and condition code 
set. 

The column headings in this appendix and 
the information each column provides 
follow. 

Instructions . This column contains the 
name of the instruction associated with the 
mnemonic operation code. 

Mnemonic Operation Code . This column gives 
the mnemonic operation code for the machine 
instruction. This is written in the 
operation field when coding the 
instruction. 

Machine Operation Code . This column 
contains the hexadecimal equivalent of the 
actual machine operation code. The 
operation code will appear in this form in 
most storage dumps and when displayed on 
the system control panel. For extended 
mnemonics, this column also contains the 
mnemonic code of the instruction from which 
the extended mnemonic is derived. 

Operand Format . This column shows the 
symbolic format of the operand field in 
both explicit and implicit form. For both 
forms, R1, R2, and R3 indicate general 


registers in operands one, two, and three 
respectively. X2 indicates a general 
register used as an index register in the 
second operand. Instructions which require 
an index register (X2) but are not to be 
indexed are shown with a 0 replacing X2. 

L, LI, and L2 indicate lengths for either 
operand, operand one, and operand two 
respectively. Ml and M3 indicate four bit 
masks in operands one and three. I, 12, 
and 13 indicate immediate data eight bits 
long (I and 12) , or four bits long (13) . 

For the explicit format, D1 and D2 
indicate a displacement and B1 and B2 
indicate a base register for operands one 
and two. 

For the implicit format, Dl, B1, and D2, 
B2 are replaced by SI and S2 which indicate 
a storage address in operands one and two. 


Type of Instruction . This column gives the 
basic machine format of the instruction 
(RR, RX, SI, or SS) . If an instruction is 
included in a special feature or is an 
extended mnemonic, this is also indicated. 

Program Interruptions Possible . This 
column indicates the possible program 
interrupts for this instruction. The 
abbreviations used are: A-Addressing, 

S-Specification, Ov-Overflow, P-Protection, 
Op-Operation (if feature is not installed) 
and Other-other interruptions which are 
listed. The type of overflow is indicated 
by: D-Decimal, E-Exponent, or F-Fixed 
Point. 

Condition Code Set . The condition set as a 
result of this instruction is indicated in 
this column. (See legend following the 
figure.) 
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r-- i 

J RR Format J 


J-— -- 

| Operation 

l Code 

1 

-T~ 

1 

1 

_L_ 

Name 

-T*~ 

1 

I 

4 

■ 

demonic 

-~T“' 

1 

1 

_i_ 

--1 

1 

Remarks { 

. .i 

j 00 

1 01 
| 02 
; 03 

1 04 

T 

1 

1 

1 

1 

I 

Set Program Mask 

1 

1 

1 

1 

1 

SPM 

1 

1 

1 

1 

1 

1 

1 

1 

1 

1 

! 05 

I 

Branch and Link 

1 

BALR 

1 

1 

06 

1 

Branch on Count 

1 

BCTR 

1 

1 

| 07 

1 

Branch on Condition 

1 

BCR 

1 

1 

| 08 

1 

Set Storage Key 

1 

SSK 

1 

1 

| 09 

1 

Insert Storage Key 

1 

ISK 

1 

1 

I 0A 

1 

Supervisor Call 

1 

SVC 

1 


; ob 

1 oc 

j 0D 
| 0E 

i 

1 

1 

1 

Move Long 

1 

1 

1 

1 

MVCL 

1 

1 

1 

j 

1 

Systera/370 j 

1 

j OF 

1 

1 

Compare Logical Long 

1 

1 

CLCL 

1 

1 

only j 

System/370| 

1 

1 io 

! 

1 

Load Positive 

1 

1 

LPR 

1 

1 

only j 

1 

1 11 

1 

Load Negative 

1 

LNR 

1 

1 

1 12 

1 

Load and Test 

1 

LTR 

1 

1 

1 13 

1 

Load Complement 

1 

LCR 

1 

1 

1 I 1 * 

1 

AND 

1 

NR 

1 

1 

1 15 

I 

Compare Logical 

1 

CLR 


1 

1 16 

1 

OR 

1 

OR 

1 

1 

1 17 

1 

Exclusive OR 

1 

XR 

1 

1 

1 18 

1 

Load 

1 

LR 

1 

1 

1 19 

1 

Compare 


CR 

1 


1 1A 

1 

Add 

1 

AR 

1 

1 

1 IB 

1 

Subtract 

1 

SR 

1 

1 

| 1C 

1 

Multiply 

1 

MR 

1 

1 

1 ID 

1 

Divide 

1 

DR 

1 

1 

j IE 

1 

Add Logical 

1 

ALR 

I 

1 

j IF 

1 

Subtract Logical 

1 

SLR 

I 

1 

1 20 

1 

Load Positive (Long) 

1 

lpdr 

1 

1 

1 21 

1 

Load Negative (Long) 

1 

LNDR 

1 

1 

| 22 

1 

Load and Test (Long) 

1 

LTDR 

1 

1 

| 23 

1 

Load Complement (Long) 

1 

LCDR 

1 

1 

| 24 

1 

Halve (Long) 

1 

HDR 

1 

1 

| 25 

i 

Load Rounded (Extended to Long) 

i 

LRDR 

i 

85,195, ,* 

1 

| 26 

i 

i 

Multiply (Extended) 

1 

1 

MXR 

1 

1 

System/370 J 
85,195, | 

1 

| 27 

i 

i 

Multiply (Long to Extended) 

1 

1 

MXDR 

1 

1 

System/370 j 
85,195 | 

1 

| 28 

i 

i 

Load (Long) 

1 

1 

LDR 

1 

1 

System/370 j 

1 

| 29 

i 

Compare (Long) 

1 

CDR 

! 

1 

j 2A 

i 

Add Normalized (Long) 

1 

ADR 

1 

1 

| 2B 

i 

Subtract Normalized 


SDR 

1 

1 

| 2C 

i 

Multiply (Long) 

1 

MDR 

I 

1 

j 2D 

i 

Divide (Long) 

1 

DDR 

1 

1 

j 2E 

i 

Add Unnormalized (Long) 

1 

AWR 

1 

1 

j 2F 

i 

Subtract Unnormalized (Long) 

1 

SWR 

1 

1 

1 30 

i 

Load Positive (Short) 

1 

LPLR 

1 

1 

1 31 

i 

Load Negative (Short) 

1 

LNER 

1 

1 

1 32 

i 

Load and Test (Short) 

1 

LTER 

1 

1 

| 33 

i 

Load Complement (Short) 

1 

LCER 

1 

1 

i-- 

— 1 _. 




j _ 

__ j 


Figure 16. List of Machine Instructions by Operation Code (Part 1 of 5) 
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Name 


Halve (Short) 

Load Rounded (Long to Short) 

Add Normalized (Extended) 

Subtract Normalized (Extended) 

Load (Short) 

Compare (Short) 

Add Normalized (Short) 
Subtract Normalized (Short) 
Multiply (Short) 

Divide (Short) 

Add Unnormalized (Short) 
Subtract Unnormalized (Short) 


Store Halfword 
Load Address 
Store Charater 
Insert Character 
Execute 

Branch and Link 
Branch on Count 
Branch on Condition 
Load Halfword 
Compare Halfword 
Add Halfword 
Subtract Halfword 
Multiply Halfword 

Convert to Decimal 
Convert to Binary 
Store 


AND 

Compare Logical 
OR 

Exclusive OR 
Load 
Compare 
Add 

Subtract 

Multiply 

Divide 

Add Logical 

Subtract Logical 


Store (Long) 



Figure 16. List of Machine Instructions by Operation Code (Part 2 of 5) 
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RX Format 


Operation 

Code 


Multiply (Long to Extended) 

Load (Long) 

Compare (Long) 

Add Norma 1 i zed (L ong) 
Subtract Normalized (Long) 
Multiply (Long) 

Divide (Long) 

Add Unnormalized (Long) 
Subtract Unnormalized (Long) 


Store (Short) 


Mnemonic 


Load (Short) 

1 

LE 

Compare (Short) 

1 

CE 

Add Normalized (Short) 

i 

AE 

Subtract Normalized (Short) 


SE 

Multiply (Short) 

1 

ME 

Divide (Short) 

1 

DE 

Add Unnormalized (Short) 

1 

AU 

Subtract Unnormalized (Short) 

1 

4 

SU 


T 

1 


Set System Mask 

I - 

1 

| 

SSM 

Load PSW 

1 

1 

LPSW 

Diagnose 

1 


Write Direct 

1 

WRD 

Read Direct 

1 

RDD 

Branch on Index High 

1 

BXH 

Branch on Index Low or Equal 

1 

BXLE 

Shift Right Single Logical 

1 

SRL 

Shift Left Single Logical 

1 

SLL 

Shift Right Single 

1 

SRA 

Shift Left Single 

1 

SLA 

Shift Right Double Logical 

1 

SRDL 

Shift Left Double Logical 

1 

SLDL 

Shift Right Double 

1 

SRDA 

Shift Left Double 

1 

I 

slda 

Store Multiple 

1 

1 

STM 

Test under Mask 

1 

tm 

Move (Immediate) 

1 

MVI 

Test and Set 

1 

TS 

AND (Immediate) 

i 

NI 

Compare Logical (Immediate) 

1 

CLI 

OR (Immediate) 

1 

01 

Exclusive OR (Immediate) 

1 

XI 

Load Multiple 

1 

LM 


Remarks 


85,195, 

System/370 


RS,SI Format 


Figure 16. List of Machine Instructions by Operation Code (Part 3 of 5) 
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| RS, SI Format 

j.- T 

| Operation | 
Code 


Mnemonic 


Remarks 


Start 1/0, Start I/O Fast Release 
Test I/O 

Halt I/O, Halt Device 
Test Channel 


{ SIQfSIOF 
| TIC 
j HIC r HEV 
I TCH 


Monitor Call 


(First byte of two-byte operation codes) 


Store Control 


STCTL 


Load Control 


Compare Logical Characters 
under Mask 

Store Characters under Mask 
Insert Characters under Mask 


See Note 2 


See Note 1 


System/370 
only 


See Note 3 


System/370 
only 

System/370 
only 


System/370 

only 

System/370 

only 

System/370 
only 


SS Format 


Figure 16. List of Machine Instructions by Operation Code (Fart 4 of 5) 
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| SS Format 

I-- 

| Operation 
I Code 


Move Numerics 
Move (Characters) 

Move Zones 
AND (Characters) 

Compare Logical (Characters) 
OR (Characters) 

Exclusive OR (Characters) 


Translate 

Translate and Test 
Edit 

Edit and Mark 


Shift and Round Decimal 

Move with Offset 

Pack 

Unpack 


Zero and Add Decimal 
Compare Decimal 
Add Decimal 
Subtract Decimal 
Multiply Decimal 
Divide Decimal 


Mnemonic 


Remarks 


System/370 

only 


Figure 16. List of Machine Instructions by Operation Code (Part 5 of 5) 


Note 1 : On the Model 195 and System/370 machines, the machine operations for 
Halt Device and Halt I/O are as follows: 
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! 1001 1110 XXXX XXX0 ] Halt I/O HIO 

l_ J 

r-i 

I 1001 1110 XXXX XXXI i Halt Device HDV 

i-j 


(X denotes an ignored bit position) 

On other System/360 machines the Halt I/O operation code is: 


r-^i 

I 1001 1110 XXXX XXXX I 

L-J 


The Halt Device instruction does not exist under this system; the second byte is 
completely ignored. 

Note 2 : Under the System/370 architecture the machine operations for Start I/O and 
Start I/O Fast Release are as follows: 


1001 

1100 

XXXX 

XXX 0 

"1 

1 

-J 

Start 

I/O 

SIO 

1001 

1100 

XXXX 

XXXI 

“1 

1 

Start 

I/O 

Fast Release SIOF 


(X denotes an ignored bit position) 
Under System/360 the Start I/O code is: 


r- i 

| 1001 1100 XXXX XXXX I 

L-1 

The Start I/O Fast Release instruction does not exist under this system. The second 
byte is completely ignored. 

Note 3 : The following operation codes occupy two bytes of Si-type instructions. They 
can be used on System/370 machines only. 


Operation 

Code 

1— 
1 

1 

- 4. . 

Name 

t 

1 

1 

4 _ 

Mnemonic 

B202 

t 

1 

Store CPU ID 

1 

I 

STIDP 

B203 

1 

Store Channel ID 

1 

STIDC 

B204 

1 

Set Clock 

1 

SCK 

B205 

1 

Store Clock 

1 

STCK 


—4— 


___ _ J_ 



The special Model 85, Model 195, and System/370 instructions are supported only by the 
DOS Assembler D, 14K variant. 
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r-- - - 1 - — — 

J |Mnemonic 

| {Operation 

jInstruction j Code 

i i 

{Machine J Operand Format | 

JOperationJ j 
{Code J Explicit Implicit j 
i_ j 

r 

r 

T 

T 


T 1 

| Add 

1 A 

5A 

JR1,D2 (X2,B2) or R1,D2(,B2) 

{Rl ,S2 (X2) or R1 ,S2 j 

{Add 

| AR 

1 1A 

J R 1,R2 


1 1 

|Add Decimal 

j AP 

j FA 

{ D1 (L1,B1) ,D2 (L2,B2) 

|S1 (LI) ,S2 (L2) or [ 



{ 

j 


|S1,S2 | 

|Add Halfword 

J AH 

| 4A 

JR1,D2 (X2,B2) or 

R1 ,D2 (,B2) 

| Rl ,S2 (X2) or Rl ,S2 j 

{Add Logical 

{AL 

1 

j 5E 

1 

J R1,D2 (X2,B2) or 

1 

R1 ,D2 (,B2) 

j FI ,S2 (X2) or Rl ,S2 j 

1 1 

{Add Logical 

1 

J ALR 

1 

j IE 

1 

j R 1,R2 


1 1 

1 1 

|Add Normalized, 

1 

1 

i 


1 1 

j Extended 

j AXR 

| 36 

j R 1, R2 


1 1 

|Add Normalized,Long 

j AD 

| 6A 

j R1, D2 (X2,B2) or 

R1 ,D2 (,B2) 

| Rl ,S2 (X2) or Rl ,S2 j 

|Add Normalized,Long 

| ADR 

{ 2A 

J R 1,R2 



jAda Normalized,Short 

j AE 

1 ? A 

j R1, D2 (X2,B2) or 

R1 ,D2 (,B2) 

J Rl ,S2 (X2) or R1 ,S2 j 

|Add Normalized,Short 

j AER 

1 3 A 

j R 1, R 2 

i 


1 1 

1 1 

jAdd Unnormalized,Long 

1 

j AW 

1 

j 6E 

1 

j R 1, D2 (X2,B2) or 

R1 ,D2 (,B2) 

1 1 

| Rl ,S2 (X2) or Rl ,S2 { 

{Add Unnormalized,Long 

j AWR 

j 2E 

j R 1,R2 


1 1 

|Add Unnormalized, 

J 

I 

1 


1 1 

j Short 

J AU 

1 7 E 

j R 1, D2 (X2,B2) or 

R1 ,D2 (,B2) 

J Rl ,S2 (X2) or Rl ,S2 j 

|Add Unnormalized, 

1 

1 

1 


1 1 

| Short 

j AUR 

| 3E 

| R 1, R 2 


1 1 

|And Logical 

1 N 

1 

| 54 

1 

|R1,D2 (X2,B2) or 

i 

R1 ,D2 (,B2) 

j Rl ,S2 (X2) or Rl ,S2 j 

i i 

|And Logical 

1 

j NC 

1 

j D4 

i 

j D 1 (L, B1) ,D2 (B2) 

I 1 

j SI (L) ,S2 or SI ,S2 J 

|And Logical 

j NR 

j 14 

{ R 1, R2 


1 1 

{And Logical Immediate 

j NI 

| 94 

{ D 1 (Bl) ,12 


J SI,12 j 

{Branch and Link 

j BAL 

| 45 

{R1,D2 (X2,B2) or 

R1 ,D2 (,B2) 

J Rl , S2 (X2) or Rl,S2 | 

jBranch and Link 

| BALR 

{ 05 

j R 1,R2 


1 1 

{Branch on Condition 

I 

J BC 

1 

| 47 

1 

Ml, D2 (X2, B2) or M1,D2(,B2) 

1 1 
{Ml, S2 , (X2) or j 


I 

1 

1 


|Ml,S2 { 

jBranch on Condition 

j BCR 

| 07 

| M 1,R2 


1 1 

jBranch on Count 

j BCT 

| 46 

| R 1,D2 (X2,B2) or 

R1 ,D2 (,B2) 

j Rl, S2 (X2) or Rl ,S2 j 

jBranch on Count 

j BCTR 

| 06 

j R 1,R2 


i 1 

jBranch on Equal 

j BE 

I 

j 47 (BC 
j 

8) j D2 (X2, B2) or D2 

1 

(,B2) 

|S2 (X2) or S2 j 

j j 

{Branch on High 

1 

j BH 

| 47 (BC 

2) { D2 (X2,B2) or D2 

(,B2) 

{S2 (X2) or S2 | 

{Branch on Index High 

{ BXH 

| 86 

j R 1 ,R3, D2 (B2) 


j Rl,R3,S2 J 

{Branch on Index Low 

1 

1 

1 


I 1 

jor Equal 

| BXLE 

| 87 

j R 1,R3, D2 (B2) 


j Rl,R3,S2 j 

{Branch on Low 

| BL 

| 47 (BC 

4) { D2 (X2,52) or D2 

(,B2) 

{ S2 (X2i or S2 j 

jBranch if Mixed 

| BM 

1 

| 47 (BC 
j 

4) JD2 (X2,B2) or D2 

l 

(,B2) 

JS2(X2) or S2 | 

l 1 

{Branch on Minus 

|BM 

{ 47 (BC 

1 

4) j D2 (X2,B2) or D2 

(,'B2) 

t 1 

|S2(X2) or S2 | 

jBranch on Not Equal 

j BNE 

| 47 (BC 

7) j D2 (X2,B2) or D2 

(,B2) 

JS2(X2) or S2 | 

{Branch on Not High 

J BNH 

j 47 (BC 

13) j D2 (X2,B2) or D2 

(,B2) 

|S2(X2) or S2 | 

|Branch on Not Low 

| BNL 

j 47 (BC 

11) JD2 (X2,B2) or D2 

(,B2) 

J S2(X2) or S2 J 

jBranch on Not Minus 

j BNM 

j 47 (BC 

11) jD2 (X2,B2) or D2 

(,B2) 

|S2(X2) or S2 J 

i____- - — 

X. -- 

.J__ 






4 

V> 


Figure 17. Machine Instruction Summary (Part 1 of 14) 



1 JO 











r-1- 1 


jInstruction 

|Mnemonic |Machine 
j Operation!Operation 
jCode j Code 

j. 

j Operand Format 

1 

J Explicit Implicit 

j 

1 

|Branch on Not Ones 

| BNO 

| 47 (BC 

14) 

| D2 (X2,B2) or D2 (,B2) 

(S2 (X2) or S2 

1 

jBranch on Not Plus 

| BNP 

j 47 (BC 

13) 

j D2 (X2,B2) or D2 (,B2) 

j S2 (X2) or S2 


jBranch on Not Zeros 

j BNZ 

j 47 (BC 

7) 

jD2 (X2,B2) or D2 (,B2) 

j S2 (X2) or S2 


JBranch if Ones 

| BO 

j 47 (BC 

D 

|D2 (X2,B2) or D2 (,B2) 

j S2 (X2) or S2 


jBranch on Overflow 

| BO 

1 

j 47 (BC 

1 

1 ) 

j D2 (X2,B2) or D2(,B2) 

1 

|S2 (X2) or S2 

1 


jBranch on Plus 

1 

j BP 

1 

j 47 (BC 

2 ) 

1 

| D2 (X2,B2) or D2 (, B2) 

1 

j S2 (X2) or S2 


jBranch if Zeros 

j BZ 

j 47 (BC 

8) 

| D2 (X2,B2) or D2 (,B2) 

j S2 (X2) or S2 


jBranch on Zero 

BZ 

1 47 (BC 

8) 

|D2 (X2,B2) or D2 (,B2) 

j S2 (X2) or S2 


jBranch Unconditional 

1 B 

j 47 (BC 

15) 

j D2 (X2,B2) or D2 (,B2) 

|S2(X2) or S2 


jBranch Unconditional 

| BR 

1 

| 07 (BCR 

i 

15) 

|R2 

1 

I 

I 


jCompare Algebraic 

i 

jc 

1 59 


1 

JR1,D2 (X2,B2) or R1,D2(,B2) 

1 

| Rl ,S2 (X2) or Rl 

,S21 

jCompare Algebraic 

j CR 

1 19 


j R1,R2 

1 


jCompare Decimal 

jCP 

|F9 


j D1 (L1,B1) ,D2 (L2,B2) 

|S1 (LI) ,S2 (L2) or | 

jCompare Halfword 

1 

j CH 

1 

| 49 


1 

j R1 ,D2 (X2, B2) or Rl,D2(,B2) 

1 Si,S2 

j Rl ,S2 (X2) or Rl, 

S2 | 

jCompare Logical 

| CL 
| 

1 55 
{ 


JR1,D2 (X2,B2) or Rl,D2(,B2) 

I 

j Rl ,S2 (X2) or Rl, 

i 

S2 j 

j Compare Logical 

| CLC 

1 

|D5 

i 


1 

j D1 (L f B1) , D2 (B2) 
j 

1 

j SI (L) ,S2 or SI, 

i 

S2 | 

jCompare Logical 

| CLR 

i 

1 15 

i 


|R1,R2 

i 

I 


jCompare Logical 
jCharacters under 
|Mask 

i 

i 

i 

| CLM 
| 

1 

1 

1 

j BD 


i 

i 

i 

j R1,M3,D2, (B2) 

• 

! 

1 

1 

|R1,M3,S2 

| 


,j Compare Logical 

|CL1 

1 

| 95 


I 

j D1 (B1) ,12 

|SI,12 


j Immediate 

| Compare Logical Long 

1 

| CLCL 

1 

| OF 


1 

j R1,R2 

1 

1 


| Compare,Long 

j CD 

1 6 9 


|R1,D2 (X2,B2) or R1,D2(,B2) 

|R1,S2(X2) or Rl 

,S21 

jCompare,Long 

j CDR 

| 29 
j 


j R 1 , R2 

1 

1 

i 


jCompare,Short 

| CE 

| 79 


|R1,D2 (X2,B2) or R1,D2(,B2) 

1 

j Rl ,S2 (X2) or Rl 

»S21 

jCompare,Short 

j CER 

1 39 


j Rl,R2 

1 


jConvert to Binary 

1 CVB 

j 4F 


|R1,D2 (X2,B2) or Rl,D2(,B2) 

| Rl ,S2 (X2) or Rl 

,S2| 

| Convert to Decimal 

L _ _ _ 

ICVD 

-X _ _ 

| 4E 

.X.- 


j R1 , D2 (X2 , B2) or R1,D2(,B2) 
.x ___ _ _ 

j Rl ,S2 (X2) or Rl 
x _ _ _ 

,S2 j 

__J 


Figure 17. Machine Instruction Summary (Part 2 of 14) 
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jInstruction 

L 

| |Program Interruptions 

j (Possible 

Condition Code Set 

‘I 

J 

i 

1 r T T T « T 

(Instruction (AJSJOvjpjOp(Other 

.A AAA J. J. _L 

j 00 

4 

j 01 

T 

1 10 

1 

T 

! 11 
_L 

1 

1 


r T 


T T 


T 

__j._ 

T 

T--- 

■1 

|Add 

|RX (x( 

X 

F j j 

1 

|Sum=0 

|Sum<0 

jsum>0 

(Overflow 


(Add 

j RR | | 


F j j 

1 

j Sum=0 

(SumCO 

jsum>0 

jOverflow 


|Add Decimal 

(SS,Decimal jxj 


D xx 

j Data 

j Sum=0 

j Sum<0 

jsum>0 

j Overflow 


|Add Halfword 

(RX (x( 

X 

F j j 

1 

Sum=0 

Sum<(L 

(SurtKO 

{Overflow 


|Add Logical 

|RX |xj 

1 1 I 

X 

1 1 

1 1 

! 

1 

j Sum=<0(S)| Sum 0(gj Sum=&(2)j Sum n (1) 

1 1 1 1 


|Add Logical 

| RR || 


1 1 

1 1 

1 

1 

| Sum= 0®| Sum= 0©! Sum= 0(D| Sum 0 CD 


|Add Normalized, 

1 1 i 


1 1 

1 

! 

I 

I 

I 


| Extended 

(RR,Floating Pt.j j 

X 

E j j x 

I B, C 

jR 

L 

JM 

1 


|Add Normalized,Long 

|RX,Floating Pt.jxj 

X 

E | |x 

IB, C 

jR 

i L 

i M 

jP 


JAdd Normalized,Long 

(RR,Floating Pt.J ( 

X 

E J (X 

| B, C 

i R 

i L 

j M 

(P 


(Add Normalized,Short 

(RX,Floating Pt.jxj 

X 

E j jx 

1B, C 

|R 

L 

(M 

P 


|Add Normalized,Short 

j RR,Floating Pt.j | 

i i i 

X 

E j jx 

1 i 

IB, C 

jR 

j L 

jM 

jP 


|Add Unnormalized, 

i i i 

1 ! 1 


1 1 

I I 

1 

1 

1 

1 

1 

1 

1 

1 

1 

1 


j Long 

(RX,Floating Pt.jxj 

X 

E | | X 

jc 

JR 

|L 

jM 

jP 


JAdd Unnormalized, 

! 1 1 



1 

1 

1 

1 

1 


|Long 

jRR,Floating Pt.j j 

X 

E | Jx 

jc 

jR 

JL 

jM 

jP 


|Add Unnormalized, 




1 

1 

1 

I 

J 


| Short 

|RX,Floating Pt.jxj 

X 

E | |x 

jc 

jR 

| L 

jM 

|P 


JAdd Unnormalized, 

1 1 1 



1 

1 

1 

J 

I 


j Short 

jRR,Floating Pt.j j 

X 

E | |x 

jc 

R 

L 

jM 

j P 


|Add Logical 

j RX jxj 

1 1 i 

X 


1 

1 

| J 

1 

j K 

l 

1 

1 

1 

1 


(And Logical 

1 1 1 

jss jxj 


| x J 

1 

1 

1 

1 J 

i 

K 

1 

1 

1 

1 


(And Logical 

1 RR 1 1 



1 

Id 

K 

1 

1 


|And Logical Immediate 

|SI |x( 


Jxj 

1 

j J 

jR 

1 

1 


(Branch and Link 

| RX || 


1 1 

1 

N 

N 

jN 

j N 


jBranch and Link 

J RR j] 

I t t 



1 

I 

j N 

i 

| N 

i 

jN 

jN 


(Branch on Condition 

i i i 

| RX | 



1 

1 

i 

jN 

i 

| N 

1 

j N 

1 

| N 


jBranch on Condition 

RR 



I 

N 

N 

j N 

j N 


(Branch on Count 

j RX j j 



1 

N 

N 

JN 

j N 


(Branch on Count 

jRR j j 


1 ! 

1 

|n 

N 

N 

j N 


(Branch on Equal 

j RX,Ext.Mnemonic j j 

I 1 1 


| j 

1 

1 

|N 

j 

j N 

1 

| N 

i 

j N 

1 


(Branch on High 

1 1 1 
|RX,Ext.Mnemonic| | 


1 i 

1 

1 

i 

| N 

1 

j N 

i 

N 

1 

| N 


(Branch on Index High 

j RS || 



1 

jN 

|N 

jN 

i N 


jBranch on Index Low 



! 1 

! 

! 

! 

! 

1 

1 

(or Equal 

| RS jj 



1 

1 N 

| N 

j N 

| N 


(Branch on Low 

jRX,Ext.Mnemonicj J 



1 

N 

|N 

j N 

N 


| Branch if Mixed 

jRX,Ext.Mnemonicj j 

1 I 1 


| | 

1 

|N 

1 

|N 

|N 

j N 


(Branch on Minus 

1 1 1 
(RX,Ext.Mnemonic! | 


1 1 

1 

1 

1 

N 

1 

N 

1 

j N 

1 

jN 


jBranch on Not Equal 

jRX,Ext.Mnemonicj j 



1 

i N 

N 

N 

N 


(Branch on Not High 

jRX,Ext.Mnemonicj j 


1 1 

1 

N 

j N 

N 

j N 


jBranch on Not Low 

jRX,Ext.Mnemonicj j 



1 

N 

N 

N 

N 


jBranch on Not Minus 

RX,Ext.Mnemonic | 



1 

jN 

jN 

jN 

jN 



4 

i 

-4 

-1 

1 

-4 

\ 

1 

1 

-A- 

_1___ 

.J_ 


_A _ _ 

-J 
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J (Program Interruptions 

| (Possible 

Condition 

Code Set 

-1 

| t>xnot<ion 

1 r . m 

1 ^ yP® r T T T T T 1 

(Instruction j A( SJ Ov j PjOp jOt'her j 00 

i. J. J- X J. X X J. 

T 1 

( 01 
_i _ _ j 

io i ii 

j. 


| Branch on Not Ones 

r t t 

jRX,Ext.Mnemonic| j J 

T T 

1 1 

T 

|N 

l 

JN 

N 

| N 


jBranch on Not Plus 

jRX,Ext.Mnemonicj J j 

1 1 

i N 

jN 

N 

i N 


| Branch on Not Zeros 

|RX,Ext.Mnemonic! ( j 

1 1 

|N 

jN 

N 

j N 


jBranch if Ones 

jRX,Ext.Mnemonic! j j 

1 1 

jN 

j N 

N 

j N 


|Branch on Overflow 

jRX,Ext.Mnemonic! j j 

1 111 

1 1 

1 1 

|N 

1 

j N 

1 

N 

jN 

1 


jBranch on Plus 

1 III 

|RX,Ext.Mnemonic| J ( 

1 1 

J 1 

1 N 

1 

j N 

N 

1 

| N 


| Branch if Zeros 

jRX,Ext.Mnemonicj j j 

1 1 

i n 

| N 

N 

jN 


| Branch on Zero 

|RX,Ext.Mnemonic! j j 

1 1 

jN 

| N 

N 

jN 


jBranch Unconditional 

|RX,Ext.Mnemonic! j j 

1 1 

j N 

|N 

N 

|N 


jBranch Unconditional 

jRR,Ext.Mnemonicj j j 

1 111 

1 1 

I 1 

jN 

i 

i N 

i 

N 

jN 

i 


jCompare Algebraic 

1 111 

|RX Ixjxj 

1 1 

1 1 

1 

1 z 

i 

1AA 

BB 

1 

1 


jCompare Algebraic 

jRR 1 1 1 

1 1 

i z 

j AA 

BB 

1 


jCompare Decimal 

(SS,Decimal j xj ( 

1 1 x 

Data j Z 

j AA 

BB 

1 


jCompare Halfword 

(RX Ixjxj 

1 1 

i Z 

j AA 

BB 

1 


jCompare Logical 

1RX |x(x( 

1 ill 

1 1 

I | 

j z 

I 

j AA 

j 

BB 

1 


jCompare Logical 

1 III 

(SS Ixjxj 

1 1 

1 1 

1 

1 Z 

(AA 

BB 

1 

1 


jCompare Logical 

| RR |x( ( 

1 1 

j Z 

j AA 

BB 

1 


jCompare Logical 
jCharacters under 
(Mask 

1 III 

1 1 11 

RS jx( j 

1 1 

1 1 
(xj X 

1 

1 

jxx 

1 

1 

j YY 

ZZ 

1 

1 

1 


(Compare Logical 
jImmediate 

1 III 

(SI |x( ( 

1 1 

1 1 

1 

1 Z 

1 

(AA 

BB 

1 

1 


(Compare Logical Long 

j RR jxjx 

x| X 

j Z 

j AA 

BB 

1 


jCompare,Long 

jRX,Floating Pt.jxjxj 

1 j X 

j Z 

j AA 

BB 

l 


jcomapre,Long 

|RR,Floating Pt.jxjxj 

1 It! 

1 1 X 

1 1 

i z 

1 

j AA 

i 

BB 

1 

f 


(Compare,Short 

1 III 

(RX,Floating Pt.|x(xj 

1 1 

1 1 X 

1 

1 Z 

(AA 

BB 

1 

1 


(Compare,Short 

jRR,Floating Pt.j jxj 

j i x 

j Z 

jAA 

BB 

1 


(Convert to Binary 

jRX |x|x( 

1 1 

Data,F j N 

|N 

N 

(N 


(Convert to Decimal 

(RX jxjxj 

1 X 1 

(n 

jN 

N 

j N 



_j _ — -- i__r x 

- X-X - X -J.-- 

_ 1 __ j 

_ 

_-L_ _ 

_J 
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Instruction 

~t— 

jMnemonic 
j Operation 
| Code 

T- - 

|Machine 

J Operation 
| Code 
r 

| Operand Format 

1 

| Explicit implicit 

j. 


1- 

1 

T 

T 


Divide 

i D 

j 5D 

|R1,D2 (X2,B2) or 

R1 ,D2 (,B2) |R1 ,S2 (X2) 

or Rl,S2 

Divide 

j DR 

1 ID 

| R 1, R2 

I 


Divide Decimal 

j DP 

|FD 

| D1, (L1,B1) ,D2 (L2,B2) | SI (LI) ,S2 (L2) or 


1 

1 


|SI,S2 


Divide,Long 

j DD 

| 6D 

j R 1,D2 (X2,B2) ,or 

R1 ,D2 (,B2) j R1 ,S2 (X2) 

or Rl,S2 

Divide,Long 

j DDR 

1 

j 2D 

1 

j R 1, R 2 

1 

1 


Divide,Short 

1 

| DE 

1 

1 7 D 

| R1,D2 (X2,B2) or 

R1,D2(,B2) | R1 ,S2 (X2) 

or Rl,S2 

Divide,Short 

| DER 

J 3D 

j R 1, R2 

1 


Edit 

| ED 

j DE 

j D1 (L, B1) ,D2 (B2) 

1 SI (L) ,S2 

or S1,S2 

Edit and Mark 

EDMK 

DF 

j D 1 (L,B1) ,D2 (B2) 

|S1 (L) ,S2 

or S1,S2 

Exclusive Or 

1 

! 57 
| 

j R1,D2 (X2 # B2) or 

i 

R1 r D2 (, B2) J R1 ,S2 (X2) 

1 

or Rl,S2 

Exclusive Or 

1 

j xc 

1 

ID7 

J D 1 (L,B1) ,D2 (B2) 

| S1 (L) ,S2 

or SI,S2 

Exclusive Or 

J XR 

1 I 7 

j R1,R2 



Exclusive Or 

1 

1 

I 



Immediate 

1 X1 

| 97 

j D1 (B1) , 12 

|SI,12 


Execute 

j EX 

j 44 

j R 1, D2 (X2, B2) or 

Rl ,D2 (,B2) j R1 ,S2 (X2) 

or Rl,S2 

Halve,Long 

| HDR 

1 

[24 

1 

|R1,R2 

j 

1 

l 


Halve,Short 

i 

j HER 

i 34 

|R1,R2 

1 

i 


Halt Device 

J HDV 

| 9E 1 

| D 1 (B 1) 

j SI 


Halt I/O 

HIO 

j 9E 1 

| D 1 (B1) 

| SI 


Insert Character 

j IC 

1 43 

j R 1, D2 (X2, B2) or 

R1,D2 (,B2) J Rl ,S2 (X2) 

or Rl,S2 

Insert Characters 

1 

1 




under Mask 

j ICM 

(BF 

| R 1 ,M3, D2 (B2) 

|Rl,M3,S2 


Insert Storage Key 

| ISK 

| 09 

|R1,R2 



Load 

j L 

j 58 

|R1,D2 (X2,B2) or 

1 

Rl ,D2 (, B2) | R1 ,S2 (X2) 

* 

or Rl,S2 

Load 

1 

j LR 

1 

| 18 

| R 1,R2 

i 

i 


Load Address 

|LA 

| 41 

|R1,D2 (X2,B2) or 

Rl ,D2 (,B2) | Rl ,S2 (X2) 

or Rl,S2 

Load and Test 

j LTR 

1 12 

j R1,R2 

1 


Load and Test,Long 

| ltdr 

1 22 

j R 1, R2 



Load and Test,Short 

| lter 

1 3 2 

j R 1, R2 

1 

1 


Load Complement 

| LCR 

1 

1 13 

1 

| R 1, R2 

1 


Load Complement,Long 

JLCDR 

| 23 

j R 1, R2 

1 


Load Complement,Short1LCER 

j 33 

j R 1,R2 

1 


Load Control 

JLCTL 

|B7 

j R 1 ,R3, D2 (B2) 

j Rl,R3,S2 


Load Halfword 

j LH 

| 48 

|R1,D2 (X2,B2) or 

Rl ,D2 (,B2) | Rl ,S2 (X2) 

or Rl f S2 

Load,Long 

j LD 

j 68 

|R1,D2 (X2,B2) or 

Rl ,D2 (,B2) | Rl ,S2 (X2) 

or R1,S2 

Load,Long 

|LDR 

| 28 

j R 1, R2 

1 


Load Multiple 

j LM 

1 98 

|R1,R3,D2 (B2) 

j Rl, R3,S2 


Load Negative 

|LNR 

|11 

| R 1, R2 

1 


Load Negative,Long 

JLNDR 

1 21 

| R 1, R2 

1 


Load Negative,Short 

|LNER 

1 

1 31 
| 

j R1,R2 

1 

i 


Load Positive 

(LPR 

1 

| 10 

| R 1, R2 

1 

1 


Load Positive,Long 

|LPDR 

| 20 

j R1,R2 



Load Positive,Short 

j lper 

| 30 

j R 1 ,R2 

1 


Load PSW 

j LPSW 

| 82 

J D1 (Bl) 

| SI 


Load Rounded, 

1 

1 


1 


Extended to Long 

j lrdr 

1 25 

|R 1,R2 



Load Rounded, 

1 

1 


I 


Long to Short 

I lrer 

1 35 

j R1,R2 



Load,Short 

|LE 

1 _ 

| 78 

i.. . 

|R1,D2 (X2,B2) or 

i _ .. _ 

Rl ,D'2 (, B2) | Rl ,S2 (X2) 

-t _ _ 

or Rl,S2 

1 See Note 1, Figure 

16. 
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r - 

jInstruction 

i . _ .. __ .. 

|Mnemonic J Machine { Operand Format | 
jOperation! Operation{ j 
|Code {Code { Explicit Implicit j 

J. _ L J. “ i 

r “-“*■** 

| Load,Short 

T 

| LER 

| 38 

|R1,R2 

T 

1 

i 

jMonitor Call 

j MC 

j AF 

jDl (B1) ,12 

jsi,l2 


|Move Characters 

jMVC 

J D2 

jDl (L,B1) ,D2 (B2) 

{SI (L) ,S2 

or S1,S2 | 

|Move Immediate 

j MVI 

{ 92 

jDl (B1) ,12 

|SI,12 


|Move Long 

JMVCL 

OE 

|r1,R2 

1 


|Move Numerics 

j MVN 

i D1 

jDl (L,B1) ,D2 (B2) 

| S1 (L) ,S2 

or S1,S2 | 

|Move with Offset 

j MVO 

j FI 

jDl (L1,B1) ,D2 (L2,B2) 

{SI (LI) ,S2 (L2) or | 


1 

1 

1 

1 

i 

1 

|SI,S2 

1 


|Move Zones 

j MVZ 

1 

D3 

1 

JDl (L,B1) ,D2 (B2) 

1 

|S1(L) ,S2 

or S1,S2 j 

jMultiply 

|M 

1 5C 

jR1 ,D2 (X2,B2) or R1 ,D2 (,E2) 

j Rl ,S2 (X2) 

or Rl,S2j 

| Multiply 

j MR 

J 1C 

|R1,R2 

1 


jMultiply Decimal 

|MP 

j FC 

jDl (L1,B1) ,D2 (L2,B2) 

{SI (LI) ,S2 (L2) or | 



1 

1 

|SI,S2 


jMultiply, Extended 

| MXR 

j 26 

|R1,R2 

1 


{Multiply Halfword 

j MH 

j 4C 

I 

jRl,D2 (X2,B2) or R1 ,D2 (,E2) 

1 

j PI r S2 (X2) 

1 

or R1,S2| 

jMultiply,Long 

{MD 

1 

j 6C 

1 

|R1,D2 (X2,B2) or Rl,D2(,E2) 

| Rl ,S2 (X2) 

or R1,S2| 

jMultiply,Long 

j MDR 

{ 2C 

jRl,R2 

1 


{Multiply, Long to 


1 

1 

1 


j Extended 

{MXD 

j 27 

JR1,D2 (X2,B2) or Rl ,D2 (,E2) 

j Rl ,S2 (X2) 

or Rl (S2) 

{Multiply, Long to 


1 




{Extended 

JMXDR 

1 67 

{Rl,R2 

1 


{Multiply,Short 

{ME 

1 7C 

|R1,D2 (X2,B2) or Rl,D2 (,E2) 

j Rl ,S2 (X2) 

or R1,S2| 

{Multiply,Short 

j MER 

j 3C 

jRl,R2 

1 


{No Operation 

!nop 

J 47 (BC 0) 

jD2 (X2, B2) or D2 (,B2) 

|S2(X2) or 

S 2 | 


_1__ 

_L_ 

.X- - --- _ 

X-- 

_j 
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— ”T - — 







-1 


1 

(Program Interruptions 






1 

(Possible 



Condition Code Set 


jInstruction 

j Type of 

H"T - T~T — 

-T- 

T - 


T - 

- r - 

-^ 


(Instruction 

(A|S|0v|P(Op(Other 

| 00 

j 01 

1 10 

1 11 


L 

t 

___L_4_4_ 4. _ L . 

-4 

.4__ 


X 


_ i 

{Divide 

( RX 

— T r r 7—r— 
(X(x( ( J 

T 

|F 

T - 

|N 

In 

t —-™. 
N 

IN 

- i 

jDivide 

(RR 

1 |x| 

1 

|F 

|N 

n 

N 

j N 


jDivide Decimal 

jSS,Decimal 

|x(x( 

X |x 

|D,Data N 

N 

N 

j N 


(Divide,Long 

j RX,Floating 

Pt.jx jx j E 

jx 

|b,e 

jN 

N 

jN 

N 


(Divide,Long 

j RR,Floating 

1 

Pt.j jx jE 

|x 

I 

1B, E 

1 

(N 

1 

jN 

1 

jN 

1 

j N 

1 


(Divide/Short 

1 

( RX,Floating 

1 1 1 

Pt. j x j x j E 

1 

}x 

1 

1 B , E 

I 

jN 

1 

N 

1 

| N 

1 

j N 


jDivide/Short 

j RR,Floating 

Pt.j jx j E 

jx 

1B, E 

jN 

N 

j N 

j N 


(Edit 

j SS,Decimal 

jx j j 

X jx 

jData 

is 

|T 

ju 

1 


(Edit and Mark 

j SS,Decimal 

x 

X jx 

j Data 

js 

j T 

ju 

1 


(Exclusive Or 

J RX 

• 

j X j X j 

1 I 1 

“1 

1 

i 

1 

| J 

1 

jK 

1 

1 

1 

1 


(Exclusive Or 

1 

| SS 

1 1 1 
(X1 ( 

l 

X ( 

1 

1 

1 

j J 

1 

K 

1 

1 

1 

1 


(Exclusive Or 

(RR 


1 

1 

jo 

jK 

1 

1 


(Exclusive Or 

1 


1 

1 

1 

1 

1 

1 


JImmediate 

1 si 

jx j j 

x j 

1 

j J 

jK 

1 

1 


j Execute 

j RX 

1 X j X j 

1 

|G 

|May 

be set by 

this 

instruction! 

j Halve,Long 

| RR,Floating 

Pt.( Jx ( 

|x 

1 

1 

l 

| N 

1 

| N 

i 

jN 

1 

| N 

t 


(Halve/Short 

1 

( RR,Floating 

Pt.1 (x( 

1 

Jx 

1 

1 

1 

jN 

1 

jN 

1 

jN 

1 

jN 


(Halt Device 

1 si 


i 

A 

jDD 

|CC 

jAAL 

j KK 


(Halt I/O 

( SI 


1 

jA 

DD 

|CC 

| GG 

KK 


jInsert Character 

j RX 

jx j j 

I 

1 

jN 

j N 

j N 

|N 


jInsert Characters 

1 



1 

1 

1 

1 

1 


junder Mask 

j RS 

|x| ( 

X jx 

1 

|UU 

|TT 

|SS 

1 


( Insert Storage Key 

j RR 

1 X |x 1 

jx 

j^ 

jN 

jN 

| N 

jN 


(Load 

J RX 

i 

|x(x( 

! 

1 

I 

j N 

1 

jN 

i 

j N 

i 

j N 

i 


(Load 

1 

| RR 

1 1 1 

1 1 1 

1 

1 

1 

1 

| N 

i 

| N 

1 

( N 

i 

IN 


|Load Address 

j RX 

1 1 1 

1 

1 

N 

N 

j N 

jN 


(Load and Test 

(RR 

1 1 i 

1 

1 

( J 

| L 

M 

1 


(Load and Test/Long 

j RR,Floating 

Pt.j jxj 

Jx 

1 

jR 

| L 

i M 

1 


(Load and Test/Short 

j RR,Floating 

1 

Pt.j jxj 

1 1 1 

jx 

1 

1 

1 

|R 

l 

| L 

i 

jM 

i 

1 

I 


(Load Complement 

1 

(RR 

i 1 1 

i 1 \ F 

1 

1 

1 

1 

i 

|p 

1 

| L 

1 

(M 

1 

1 ° 


|Load Complement,Long 

j RR,Floating 

Pt.j jxj 

(x 

1 

jR 

j L 

jM 

1 


(Load Complement,Short 

j RR,Floating 

Pt.j jxj 

jx 

1 

)r 

i L 

}m 

1 


|Load Control 

(RS 

jx jx j 

X jx 

1 A 

|n 

N 

N 

|N 


ILoad Halfword 

(RX 

JxJxJ 

i 

i 

N 

N 

j N 

jN 


jLoad,Long 

|RX,Floating 

Pt. jx jx j 

jx 

1 

jN 

j N 

(N 

j N 


(Load,Long 

j RR,Floating 

Pt.j jxj 

jx 

1 

|n 

jN 

jN 

jN 


(Load Multiple 

(RS 

jx jx j 

1 

1 

|N 

} N 

j N 

JN 


(Load Negative 

(RR 

1 I ! 

1 

1 

i j 

i L 

1 

1 


(Load Negative,Long 

j RR,Floating 

Pt.j jxj 

|x 

1 

j R 

i L 

1 



(Load Negative,Short 

j RR,Floating 

l 

Pt.j jxj 

1 ! 1 

jx 

1 

1 

i 

i* 

i 

i L 

i 

1 

i 

1 

| 


(Load Positive 

1 

| RR 

1 1 1 
j j j F 

1 

1 

1 

1 

i 

( j 

i 

i 

( M 

1 

1 ° 


(Load Positive,Long 

j RR,Floating 

Pt.j jxj 

Jx 

1 

jR 

(L 

jM 

1 


(Load Positive,Short 

RR,Floating 

Pt.j jxj 

jx 

1 

is 

i L 

jM 

1 


Load PSW 

1 si 

1 X j X j 

I 

jA 

ICQ 

IQC 

ICQ 

(QQ 


Load Rounded/Extended 

1 ! 1 

I 

1 

( 

1 

1 

1 


j to Long 

j RR,Floating 

Pt.j jx j E 

! x 

1 

jN 

jN 

( N 

jN 


(Load Rounded,Long 

1 

1 i I 

1 

1 

1 

1 

1 

1 


j to Short 

J RR,Floating 

Pt.j jx j E 

J X 

1 

(N 

jN 

jN 

jN 


j Load,Short 

j RX,Floating 

Pt.jxjxj 

jx 

1 

IN 

jN 

j N 

jN 


(Monitor Call 

|SI 

x 

x 

|G,A 

jN 

|n 

jN 

jN 


L --- - 

j. __ 

_4-4-4-4-4— 

.4-- 


-4 — 

4-_ 

—4—- 

-j 
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r- 


_ — T — 







-i 


1 

(Program 

Interruptions 




1 


1 

(Possible 



Condition Code set 

1 



L _ _ 







_j 


1 ^ J £“•*—■' Vi 

*11 T 


"T- 

T —" ' " 

”7 

- 

- T -— 

-1 

i . .. 

jInstruction 

j- 

|A|S|Ov| 
__j_j_ j._ ± 

P|Op|Other 
x ± 

| 00 

4 

1 01 

4 

1 io 

i ... 

1 11 
l 

! 

.. j 

|Load,Short 

| RR,Floating 

—1 1 T—T 

Pt.j jxj j 

T 

1 x 

T 

1 

7 

|N 

—r 
jN 

(N 

T 

jN 

i 

|Move Characters 

SS 

j x j j j 

X 

1 

N 

N 

N 

N 


|Move Immediate 

1 si 

X ji 

X j 

1 

jN 

|n 

(N 

| N 


(Move Long 

j RR 

i xj xj j 

X j X 

1 

j AAA 

jAAB 

jAAC 

| AAD 


|Move Numerics 

j SS 

jxj j j 

X 

1 

N 

N 

N 

j N 


|Move with Offset 

| SS 

1 

jxj j j 
Mil 

X j 

1 

1 

1 

|N 

1 

j N 

I 

j N 

1 

jN 

1 


|Move Zones 

1 

j SS 

1 1 i 1 

( X1 1 1 

1 

x| 

1 

1 

1 

N 

1 

N 

1 

N 

1 

N 


(Multiply 

( RX 

j xj xj j 

1 

1 

j N 

j N 

jN 

| N 


(Multiply 

j RR 

j jxj j 

1 

1 

i N 

N 

j N 

N 


(Multiply Decimal 

j SS,Decimal 

j xj xj j 

x] X 

|Data 

N 

N 

j N 

N 


j Multiply,Extended 

| RR,Floating 

Pt.j j X j E j 

j x 

j B 

jN 

i N 

jN 

jN 


(Multiply Halfword 

| RX 

i 

j X j X j j 

III 1 

I 

1 

1 

1 

| N 

I 

j N 

I 

JN 

I 

j N 

i 


(Multiply,Long 

1 

(RX,Floating 

III 1 
Pt.jxjxjE j 

1 

| X 

1 

|B 

i 

jN 

i 

j N 

i 

jN 

i 

jN 


(Multiply,Long 

j RR,Floating 

Pt.j |xj E j 

1 X 

|B 

(n 

j N 

jN 

jN 


(Multiply,Long 

1 

Mil 

1 

1 

1 

1 

1 

1 


|to Extended 

| RX,Floating 

Pt.(x(x|E 1 

x| X 

jB 

jN 

j N 

jN 

jN 


(Multiply,Long 

1 

1 1 I i 

1 

1 

! 

1 

1 

1 


jto Extended 

|RR,Floating 

Pt.1 |x|E J 

1 x 

B 

N 

N 

N 

N 


jMultiply,Short 

j RX,Floating 

Pt.jxjxjE j 

j X 

jB 

j N 

J N 

jN 

N 


(Multiply,Short 

j RR,Floating 

Pt.j jx E j 

j x 

j B 

jN 

j N 

j N 

j N 


|No Operation 

|RX,Ext.Mnemonicj ( | j 

1 

1 

i N 

jN 

jN 

jN 



_x _ _ 

-x_x_x _a 

_A_ 

-X_ 

_x__ 


X 

X 

—j 
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”1 - 

1 -- 



--- 



|Mnemonic 

(Machine 

1 Operand Format 


( 


J Operation(Operation) 



1 

jInstruction 

| Code 

(Code 

| Explicit 

Implicit | 


-4- 

J. 

i_ _ 



J 

f 


1 


T-“ 

* "" “ 

I 

JNo Operation 

( NOPR 

j 07 (BCR 0) 

j R2 

( 


jor Logical 

1 o 

j 56 

j Rl,D2 (X2, B2) orRl,D2(,B2) 

j Rl ,S2 (X2) 

or 

Rl ,S21 

(Or Logical 

j OC 

j D6 

JD1 (L, B1) , D2 (B2) 

(SI (L) ,S2 

I 

or S1,S2 I 

jor Logical 

OR 

1 16 

j Rl, R2 



(Or Logical Immediate 

(01 

( 96 

J D1 (B1) ,12 

(SI,12 



|Pack 

j PACK 

j F2 

(D1 (L1,B1) ,D2 (L2 , B2) 

(SI (LI) ,S2 (L2) 

or j 


1 

1 

I 

1 

1 

1 

| S 1 ,S2 



|Read Direct 

1 

j RDD 

1 85 

(D1 (B1) ,12 

(SI,12 



(Set Clock 

j SCK 

j B204 

j D 1 (B1) 

| SI 



|Set Program Mask 

| SPM 

J 04 

J R 1 

1 



jset System Key 

j SSK 

J 08 

j R 1 ,R2 

1 



(Set System Mask 
(Shift and Round 

( SSM 

1 

( 80 

1 

(D1 (B 1) 

1 

i si 

i 



(Decimal 

J SRP 

1 

(F0 

1 

JD1 (LI ,B1) ,D2 (B2) ,M3 

1 

| SI (LI) ,S2 
(SI,S2,M3 

,M3 

or J 

(Shift Left Double 
(Algebraic 

1 

( SLDA 

1 

j 8F 
| 

I 

j R 1, D2 (B2) 

1 

1 

j Rl,S2 

1 



(Shift Left Double 
(Logical 

1 

1 

I sldl 

1 

1 

j 8D 

1 

1 

( R 1, D2 (B2) 

( 

1 

(Rl,S2 



jShift Left Single 
(Algebraic 

1 

| SLA 

1 

j 8B 

1 

j R 1, D2 (B2) 

1 

J Rl,S2 



jShift Left Single 
(Logical 

1 

| SLL 

1 

| 89 

1 

j R 1, D2 (B2) 

1 

(Rl,S2 



jShift Right Double 

(Algebraic 

(Shift Right Double 

1 

j SRDA 

1 

1 

| 8E 

1 

1 

| R1, D2 (B2) 

1 

1 

j Rl,S2 

1 



jLogical 

J SRDL 

1 

J 8C 
| 

| R 1, D2 (B2) 

j Rl,S2 



| Shift Right Single 
(Algebraic 

! 

i 

| SRA 

i 

1 

| 8A 

1 

1 

|R1,D2 (B2) 

1 

1 

(Rl,S2 



(Shift Right Single 
(Logical 

1 

( SRL 

1 

| 88 

1 

j R 1, D2 (B2) 

i 

(Rl,S2 



jStart I/O 

J SIO 

J 9C 1 

j D 1 (B1) 

| SI 



jStart I/O Fast 
(Release 

1 

j SI OF 

1 

( 9C 1 

1 

j D 1 (B1) 

1 

I SI 



J Store 

( ST 

J 50 

(R1,D2 (X2,B2) or R1,D2(,B2) 

i Rl ,S2 (X2) 

or 

R1,S2( 

jStore Channel ID 

j STIDC 

j B203 

j D1 (B1) 

I SI 



jStore Character 
jStore Characters 

| STC 

1 

| 42 

1 

JR1,D2 (X2,B2) or R1,D2(,B2) 

1 

j Rl ,D2 (X2) 

! 

or 

Rl ,S21 

j 

(under Mask 

j STCM 

( BE 

|R1,M3,D2 (B2) 

(R1,M3,S2 



(Store Clock 

| STCK 

j B205 

j D 1 (B1) 

| SI 



(Store Control 

(STCTL 

(B6 

(R1,R3,D2 (B2) 

j Rl,R3,S2 



| Store CPU ID 

j STIDP 

1 

| B202 

1 

1 D 1 (B1) 

1 

(SI 



(Store Halfword 

1 

j STH 

J 40 

(R1,D2 (X2,B2) or Rl ,D2 (,B2) 

I 

( Rl ,S2 (X2) 

or 

Rl ,S21 

(Store Long 

j STD 

( 60 

j R 1, D2 (X2,B2) 

| Rl ,S2 (X2) 

or 

Rl ,S2| 

jStore Multiple 

j STM 

( 90 

jR1,R2,D2 (B2) 

(Rl,R2,S2 



(Store Short 

j STE 

( 70 

(R1,D2 (X2,B2) or Rl ,D2 (,B2) 

j Rl ,S2 (X2) 

or 

Rl ,S21 

j Subtract 

1 S 

1 

1 5B 

| R1,D2 (X2) 

j Rl ,S2 (X2) 

or 

Rl ,S21 

j Subtract 

1 

J SR 

1 

1 IB 

1 

j R1,R2 

1 

( 



jSubtract Decimal 

j SP 

j FB 

j D1 (LI ,B1) ,D2 (L2,B2) 

(SI (LI) ,S2 (L2) 

or j 


1 

1 

1 

|SI,S2 



(Subtract Halfword 

j SH 

j 4B 

(R1,D2 (X2,B2) or R1,D2(,B2) 

|R1,S2 (X2) 

or 

Rl ,S21 

(Subtract Logical 

J SL 

( 5F 

(R1,D2 (X2,B2) or R1,D2(,B2) 

(Rl ,S2 (X2) 

or 

Rl,S2 j 

(Subtract Logical 

j SLR 

j IF 

JR1,R2 

1 



Y - 

_i__ 

.x 

X 

X__ 

_ _ 

- J 


I 1 See Note 2, Figure 16. j 

l-J 

Figure 17. Machine Instruction Summary (Part 9 of 14) 


138 










Instruction 

T- ~ 

|Mnemonic 
j Operation 
j Code 

i 

T ~- 

|Machine 
j Operation 
j Code 

i . 

T-- ~ - ---- 

| Operand Format 

1 

( Explicit Implicit 

_L 

Subtract Normalized, 

r 

1 

r — 

1 

T 

1 

T 

1 

Extended 

j SXR 

| 37 

j R1 ,R2 

1 

Subtract Normalized, 

1 

1 

1 

1 

Long 

| SD 

j 6B 

|R1,D2 (X2,B2) or R1,D2(,B2) 

jR1 ,S2 (X2) or R1 ,S2 

Subtract Normalized, 

1 

1 

1 

! 

Long 

j SDR 

j 2B 

J R1,R2 

1 

Subtract Normalized, 

1 

1 

1 

1 

Short 

j SE 

1 7B 

JR1,D2 (X2,B2) or R1 ,D2 (,B2) 

|R1,S2(X2) or Rl,S2 

Subtract Normalized, 

1 

1 

1 

1 

Short 

j SER 

| 3B 

j R1,R2 

i 

Subtract 

1 

1 


1 

Unnormalized,Long 

j SW 

1 

j 6F 

1 

| R 1, D2 (X2, B2) or R1,D2(,B2) 

j Rl ,S2 (X2) or Rl ,S2 

1 

Subtract 

1 

1 

1 

1 

1 

1 

1 

1 

Unnormalized,Long 

j SWR 

j 2F 

}R1,R2 

1 

Subtract 

1 

1 

! 

1 

Unnormalized,Short 

1 su 

j 7F 

j R 1 , D2 (X2, B2) or R1,D2(,B2) 

|R1,S2(X2) or Rl ,S2 

Subtract 

1 

1 

I 

1 

Unnprmalized,Short 

j SUR 

j 3F 

j R1,R2 

1 

Supervisor Call 

j SVC 

| 0A 

JI 

1 

Test and Set 

|TS 

i 

1 93 

1 

j D1 (B1) 

i 

| SI 

1 

Test Channel 

i 

| TCH 

1 

j 9F 

i 

j D1 (B1) 

1 

| SI 

Test I/O 

j TIO 

j 9D 

j D1 (B1) 

i si 

Test Under Mask 

j TM 

J 91 

J D1 (B1) ,12 

| SI,12 

Translate 

j TR 

j DC 

j D1 (L, B1) ,D2 (B2) 

j SI (L) ,S2 or SI ,S2 

Translate and Test 

| TRT 

i 

| DD 

I 

| D1 (L # B1) 9 D2 (B2) 

1 

| SI (L) r S2 or SI ,S2 

Unpack 

i 

j UNPK 

1 

j F3 

1 

jD1 (L1,B1) ,D2 (L2,B2) 

I 

|S1 (LI) ,S2 (L2) or 

Write Direct 

1 

| WRD 

1 

| 84 

1 

J D1 (B1) ,12 

j SI,S2 
| SI,12 

Zero and Add Decimal 

| ZAP 

|F8 

j D 1 (L1,B1) ,D2 (L2,B2) 

|S1 (LI) ,S2 (L2) or 


1 

L --- 

1 

L _ -- 

1 

J_ _ _ ___ __ 

I SI,S2 
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r --------------- 

— ~ —- r-- 


1 " 

r 




- 7 


J (Program Interruptions 




1 


( (Possible 



Condition Code Set 

l 

|instruction 








_I 

I J -yp t = ur r~T—r ~ 

t r ■ 

T 

T 

i ' 

" i " " " 

T 

—1 

! . ... . . . 

(Instruction jAjS|Ov|PjOp(Other 

j. iiiiii 

j 00 

-4 

( 01 

4 

1 10 

4 

1 ii 

4 

1 

_1 

|No Operation 

r r t 

JRR,Ext.Mnemonic( J j 

T T 

1 1 

T 

1 

JN 

JN 

1 

jN 

|N 

1 

l 

JOr Logical 

(RX ixjxj 

1 1 

1 

jj 

j K 

1 

1 

1 

|0r Logical 

ISS (x( J 

| X | 

1 

jj 

j K 

1 

1 

1 

|0r Logical 

J RR |jj 

1 1 

1 

jj 

jK 

1 

1 

1 

jor Logical Immediate 

(SI |xj j 

1 X I 

1 

j J 


1 

1 

1 

jpack 

(SS (xj j 

1 III 

1 X 1 

1 1 

1 

1 

|N 

1 

|N 

1 

jN 

1 

j N 

1 

1 

1 

(Read Direct 

1 III 

ISI (xj j 

1 1 

1 x| X 

1 

A 

1 

|N 

1 

j N 

1 

jN 

1 

jN 

1 

1 

jset Clock 

jSI jxjxj 

j xj X 

|A 

j AAE 

j AAF 

1 

jAAG 

1 

|Set Program Mask 

j RR jj| 

1 1 

1 

| RR 

(RR 

j RR 

j RR 

1 

(Set Storage Key 

(HR jxjxj 

j j X 

| A 

(N 

j N 

1 N 

jN 

j 

JSet System Mask 

(SI jxj j 

1 1 

j A 

j N 

|N 

j N 

jN 

1 

|Shift and Round 

1 III 

1 1 

1 

1 

1 

I 

1 

1 

|Decimal 

ISS |x| |D 

jxj 

jData 

j J 

jL 

jM 

jo 

1 

jShift Left Double 

1 III 

1 1 

1 

1 

1 

1 

1 

1 

jAlgebraic 

j RS j jx(F 

1 III 

1 1 

1 1 

1 

1 

j J 

1 

jL 

1 

jM 

| 

jo 

1 

1 

1 

|Shift Left Double 

1 III 

1 1 

1 1 

1 

1 

I 

1 

1 

1 

1 

1 

1 

1 

jLogical 

j RS ( j x j 

1 I 

1 

jN 

j N 

jN 

jN 

1 

jShift Left Single 

1 III 

1 1 

1 

1 

1 

1 

1 

1 

| Algebraic 

j RS j j J F 

1 1 

1 

j J 

| L 

jM 

jo 

1 

jShift Left Single 

1 III 

1 I 

1 

1 

1 

1 

1 

1 

jLogical 

1 RS j j ( 

1 1 

1 

jN 

jN 

jN 

jN 

1 

jShift Right Double 

1 III 

1 1 

1 

1 

1 

1 

1 

1 

jAlgebraic 

|RS ( Jx| 

1 1 

1 

j J 

jL 

jM 

1 

1 

jShift Right Double 

1 III 

1 1 

1 

1 

I 

1 

1 

1 

(Logical 

|RS j jxj 

1 ! 1 ! 

1 1 
» J 

1 

g 

| N 

8 

j N 
s 

| N 

1 

jN 

i 

1 

1 

| Shift Right Single 

I III 

1 1 

1 1 

1 

1 

1 

1 

1 

1 

i 

i 

1 

1 

1 

1 

jAlgebraic 

|RS ((I 

1 1 

1 

j J 

j L 

| M 

1 

1 

jShift Right Single 

1 III 

1 1 

1 

1 

1 

! 

1 

1 

(Logical 

1 RS | j j 

1 1 

1 

jN 

|N 

jN 

jN 

1 

jStart I/O 

1 si 111 

1 1 

j A 

j MM 

jcc 

j EE 

jAA 

1 

jStart I/O Fast 

1 III 

1 1 

1 

1 

1 

1 

1 

1 

(Release 

j SI j j j 

1 1 

|A 

j MM 

|CC 

jEE 

|KK 

1 

(Store 

RX x|x 

1 X 1 

1 

j N 

(N 

jN 

jN 


(Store Channel ID 

SI 

i x 

|A 

AAH 

cc 

AAI 

j KK 

1 

(Store Character 

|RX jxj j 

jxj 

1 

|N 

j N 

j N 

jN 

1 

(Store Character 

1 Ml 

1 I 

1 

1 

I 

1 

i 

1 

(under Mask 

IRS |x( | 

! x 1 

1 

| N 

| N 

jN 

jN 

1 

(Store Clock 

|SI (x| ( 

1 X 1 X 

1 

AAJ 

j AAK 

1 

jAAG 

1 

(Store Control 

j RS j x| xj 

j X j 

jA 

i N 

jN 

jN 

j N 

1 

|Store CPU ID 

jsi |xjx| 

t ill 

jxjx 

1 1 

j A 

l 

| N 

l 

| N 

l 

| N 

l 

jN 

I 

1 

1 

jStore Halfword 

i iii 

j RX jxjxj 

1 I 

1 x 1 

i 

i 

i 

IN 

i 

jN 

i 

jN 

1 

| N 

1 

1 

jStore Long 

(RX,Floating Pt.jxjxj 

jxjx 

i 

|N 

j N 

jN 

jN 

1 

(Store Multiple 

j RS jxjxj 

i x i 

i 

| N 

jN 

JN 

jN 

1 

(Store Short 

jRX,Floating Pt. jxjxj 

jxjx 

i 

jN 

j N 

j N 

jN 

1 

j Subtract 

| RX | xj xj F 

i til 

1 1 

1 1 

i 

| V 

1 

jx 

1 

j Y 

l 

|0 

1 

1 

1 

j Subtract 

(RR j j jF 

i 1 

1 1 

i 

i 

1 

jv 

1 

jx 

i 

j Y 

1 

jo 

1 

1 

(Subtract Decimal 

jss,Decimal jxj jD 

jxjx 

j Dc.ta 

V 

jx 

Y 

jo 

1 

(Subtract Halfword 

j RX j x j x j F 

1 1 

1 

i v 

jx 

i Y 

jo 

1 

(Subtract Logical 

j RX jxjxj 

1 1 

1 

i 

|W,H 

|V,I 

|W # I 

1 

(Subtract Logical 

i RR j j j 

1 1 

1 

i 

|W,H 

|V,I 

|W,I 

1 

L _ 

— j. _ _ _l-i i _ 

1-1— 

.1 - 

.4- 

_1__ 

-4- _ _ 

4- 

__1 
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r- 

j Instruction 

! 

T - 

1 

1 

j Type of 
jInstruction 

x 

J Program Instructions 
j Possible 

Condition Code Set 

— l 

_j 

1" T T T T T T 

jA|S| Ovjpj Op|Other j OC 

J. J. J. J. X L _L_ 

j 01 

4 

j 1C 

j 11 

4 

1 

— 4 



T T T T 

T 

T 

1 




1 

| Subtract Normalized, 

1 

IM! 

1 

1 

1 

1 

i 

i 


j Extended 
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1 


o 


Program Interruptions Possible 


| Under Ov: j 
J D=Decimal | 
j E=Exponent j 
j F=Fixed Point j 

J Under Other: j 
j A Privileged Operation j 
j B Exponent Underflow j 
j C Significance | 
j D Decimal Divide | 
j E Floating Point Divide j 
j F Fixed Point Divide j 
j G Execute J 
j GA Monitoring J 

(Condition Code Set | 
j H No Carry j 
j I Carry | 
j J Result=0 j 
j K Result is Not Equal to Zero j 
j L Result is Less Than Zero | 
j M Result is Greater Than Zero | 
j N Not Changed j 
| 0 Overflow j 
j P Result Exponent Underflows j 
j Q Result Exponent Overflows | 
J R Result Fraction=0 ( 
j S Result Field Equals Zero j 
( T Result Field is Less Than Zero | 
j U Result Field is Greater Than Zero j 
J V Difference=0 j 
j W Difference is Not Equal to Zero j 
j X Difference is Less Than Zero j 
j Y Difference is Greater Than Zero j 
j z First Operand Equals Second Operand j 
j AA First Operand is Less Than Second Operand j 
j BB First Operand is Greater Than Second Operand j 
j CC CSW Stored | 
j DD Channel and Subchannel not Working j 
j EE Channel or Subchannel Busy j 
j FF Channel Operating in Burst Mode j 
j GG Burst Operation Terminated j 
J HH Channel Not Operational j 
j II Interruption Pending in Channel j 
| JJ Channel Available j 
j KK Not Operational j 
j LL Available j 
j MM I/O Operation Initiated and Channel Proceeding With its Execution J 
j NN Nonzero Function Byte Found Before the First Operand Field is Exhausted j 
j 00 Last Function Byte is Nonzero j 
j PP All Function Bytes Are Zero | 
1 QQ Set According to Bits 34 and 35 of the New PSW Loaded j 
j RR Set According to Bits 2 and 3 of the Register Specified by R1 j 
| SS Leftmost Bit of Byte Specified=0 j 
| TT Leftmost Bit of Byte Specified = 1 j 
j UU Selected Bits Are All Zeros; Mask is All Zeros j 
j W Selected Bits Are Mixed (zeros and ones) j 
j WW Selected Bits Are All Ones | 
L_J 

Figure 17. Machine Instruction Summary (Part 13 of 14) 
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Condition Code Set 


.? 


XX Selected Bytes are Equal, or Mask is Zero 

YY Selected Field of First Operand is Low 

ZZ Selected Field of First Operand is High 

AAA First-operand and Second-operand Counts are Equal 

AAB First Operand Count is Lower 

AAC First Operand Count is Higher 

AAD No Movement Because of Destructive Overlap 

AAE Clock Value Set 

AAF Clock Value Secure 

AAG Clock not Operational 

AAH Channel ID Correctly Stored 

AA1 Channel Activity Prohibited During ID 

AAJ Clock Value is Valid 

AAK Clock Value Not Necessarily Valid 

AAL Channel Working With Another Device 


Figure 16. Machine Instruction Summary (Part 14 of 14) 
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Appendix E. Assembler Instructions 


Operation 

Entry 


Name Entry 


Operand Entry 


ACTR 

AGO 

AIF 


Not used, must not be present 


An arithmetic SETA expresssion 


A sequence symbol or not present 


A sequence symbol 


A sequence symbol or not present 


A logical expression enclosed in 
parentheses, immediately followed by a 
sequence symbol 


ANOP 

CCW 

CNOP 


A sequence symbol 


Not used, must not be present 


Any symbol or not present 


Four operands, separated by commas 


A sequence symbol or not present 


Two absolute expressions, separated by a 
comma 


COM 


A sequence symbol or not present 


Not used, should not be present 


COPY 

CSECT 


Not used, must not be present 


A symbol 


Any symbol or not present 


Not used, should not be present 


DC 

DROP 


Any symbol or not present 


One operand 


A sequence symbol or not present 


One to sixteen absolute expressions, 
separated by commas 


DS 


Any symbol or not present 


One operand 


DSECT 


A variable symbol or an 
ordinary symbol 


Not used, should not be present 


EJECT 


A sequence symbol or not present 


Not used, should not be present 


END 


A sequence symbol or not present 


A relocatable expression 
or not present 


ENTRY 


A sequence symbol or not present 


One or more relocatable symbols, 
separated by commas 




EQU 


A variable symbol or an 
ordinary symbol 


An absolute or relocatable expression 


EXTRN 


A sequence symbol or not present 


One or more relocatable symbols, 
separated by commas 


GBLA 


Not used, must not be present 


One or more variable symbols that are to 
be used as SET symbols, separated by 


commas 


GBLB 


Not used, must not be present 


One or more variable symbols that are to 
be used as SET symbols, separated by 
commas 1 


j.- 

| SET symbols may be defined as subscripted SET symbols 


(Part 1 of 3) 
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Operation 

Entry 


LTORG 


MACRO 2 


MEND 2 


MEX1T 2 


MNOTE 2 


PRINT 


PUNCH 


REPRO 


SPACE 


START 


Name Entry 


Not used, must not be present 


Not used, must not be present 


Not used, must not be present 


Not used, must not be present 


Not used, must not be present 


Not used, must not be present 


Any symbol or not present 


Not used, must not be present 


A sequence symbol or not present 


A sequence symbol or not present 


A sequence symbol, a variable 
symbol or not present 


A sequence symbol or not used 


A sequence symbol or not present 


A sequence symbol or not present 


A sequence symbol or not used 


SETA symbol 


A SETB symbol 


A SETC symbol 


A sequence symbol or not present 


Any symbol or not present 


Operand Entry 


One or more variable symbols that are to 
be used as SET symbols, separated by 
commas 1 


One to three decimal values, separated by 


Two decimal values, separated by a comma 


One or more variable symbols that are to 
be used as SET symbols, separated by 
commas 1 


One or more variable symbols that are to 
be used as SET symbols, separated by 
commas 1 


One or more variable symbols separated by 
commas 1 


Not used, should not be present 


Not used, should not be present 


Not used, must not be present 


Not used, must not be present 


A severity code, followed by a comma, 
followed by any combination of characters 
enclosed in apostrophes 


A relocatable expression or not used 


One to three operands 


One to 80 characters enclosed in 
apostrophes 


Not used, must not be present 


An arithmetic expression 


A 0 or a 1, or logical expression 
enclosed in parentheses 


A type attribute, a character expression, 
a substring notation, or a concatenation 
of character expressions and substring 
notations 


A decimal self-defining term or not used 


A self-defining term or not used 


1 SET 

2 May 


symbols, may be defined as subscripted SET symbols, 
only be used as part of a macro definition. 


(Part 2 of 3) 
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(Operation j 
j Entry j Name Entry 


|TITLE 1 2 3 (A special symbol (0 to 4 charac- 

| jters), a sequence symbol, a 

| (variable symbol, or not present 


!USING 


jA sequence symbol or not present 


| WXTRN 4 


(A sequence symbol or not present 


Operand Entry 


One to 100 characters, enclosed in 
apostrophes 


An absolute or relocatable expression 
followed by 1 to 16 absolute expressions, 
separated by commas 


One or more relocatable symbols, 
separated by commas 


j 3 See Section 5 for the description of the name entry. 
j 4 DOS Assembler 14K D only. 


ASSEMBLER STATEMENTS 


(Part 3 of 3) 


INSTRUCTION 


NAME ENTRY 


OPERAND ENTRY 


Model Statements 1 2 
(A variable symbol or any 
assembler language mnemonic 
operation code except COPY, 
END, ICTL, ISEQ, and PRINT) 


Prototype Statement 3 


An ordinary symbol, variable 
symbol, sequence 
symbol, a combination of 
variable symbols and other 
characters that is equivalent 
to a symbol, or not used 


A symbolic parameter or 
not used 


Any combination of characters 
(including variable 
symbols) 


Zero or more operands that 
are symbolic parameters, 
separated by commas, followed 
by zero or more operands 
(separated by commas) of the 
form symbolic parameter, 
equal sign, optional standard 
value 


Macro Instruction 
Statement 3 


An ordinary symbol, a 
variable symbol, a sequence 
symbol, a combination of 
variable symbols and other 
characters that is equivalent 
to a symbol, 4 or not used 


Zero or more positional 
operands separated by commas, 
followed by zero or more 
keyword operands (separated 
by commas) of the form 
keyword, equal sign, value 4 


Assembler Language 
Statement 1 2 


An ordinary symbol, a var¬ 
iable symbol, a sequence 
symbol, a combination 
of variable symbols and 
other characters that is 
equivalent to a symbol, 
or not used 


Any combination of characters 
(including variable symbols) 


1 Variable symbols may not be used to generate the following mnemonic operation codes: 
ACTR, COPY, END, ICTL, CSECT, DSECT, ISEQ, PRINT, REPRO, and START. Variable symbols 
may not be used in the name and operand entries of the following instructions: COPY, 
END, ICTL, and ISEQ. Variable symbols may not be used in the name entry of the ACTR 
instruction. 

2 The line following a REPRO statement may not contain variable symbols. 

3 May only be used as part of a macro definition. 

4 Variable symbols appearing in a macro instruction are replaced by their values before 
the macro instruction is processed. 
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Appendix F. Summary of Constants 


1-T 

length 

MODI¬ 
FIER 
RANGE 


T-1 

TRUN¬ 
CATION/ 
PADDING 
SIDE 


TYPE 
AND 
DELIM. 


IMPLIED 

LENGTH 

(BYTES) 


ALIGN¬ 

MENT 


SPECIFIED 

BY 


CON¬ 

STANTS 

PER 

OPERAND 


RANGE 
FOR EX¬ 
PONENTS 


RANGE 

FOR 

SCALE 


as 

needed 


byte 


1 to 
256 1 


characters 


one 


right 


H 


X ' 


as 

needed 


byte 


1 to 
256 1 


hexadecimal 

digits 


one 


left 


B ' 


as 

needed 


byte 


1 to 
256 


binary 

digits 


one 


left 


F ' 


word 


1 to 8 


decimal 

digits 


multiple 


-85 to 
+75 


-187 to 
+ 346 


left 


H ' 


half 

word 


1 to 8 


decimal 

digits 


multiple 


-85 to 
+75 


-187 to 
+ 346 


left 


E ' 


word 


1 to 8 


decimal 

digits 


multiple 


-85 to 
+ 75 


0 to 14 


right 


D ' 


double 

word 


1 to 8 


decimal 

digits 


multiple 


-85 to 
+ 75 


0 to 14 


right 


16 


double 

word 


1 to 
16 


decimal 

digits 


multiple 


-85 to 
+ 75 


0 to 28 


right 


+~ 


P f 


as 

needed 


byte 


1 to 
16 


decimal 

digits 


multiple 


left 


z * 


as 

needed 


byte 


1 to 
16 


decimal 

digits 


multiple 


left 

left 


A ( ) 


word 


1 to 4 


an absolute 
expression 


multiple 


3 or 4 


a relocatable 
or complex 
relocatable 
expression 


—\ 


V ( ) 


word 


3 or 4 


relocatable 

symbol 


multiple 


left 


S ( ) 


half 

word 


2 only 


-X__ 


one absolute 
or relocatab¬ 
le expression 
or two abso¬ 
lute expres¬ 
sions: 
exp (exp) 


multiple 


* In a DS assembler instruction, C and X type constants may have length specification 
to 65535. 

2 DOS Assembler D, 14K variant only. 


(Part 1 of 2) 
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“T" 

-r* 

HI. ILMINn 

"T-- 

“T- 

"T~-* 

•T-- 
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1 


1 

i 

LENGTH 

1 

ICON- 

1 

( 

1 

TRUN- 

TYPE | 

IMPLIED 

1 

i 

MODI- 

1 

j STANTS 

jRANGE 

j RANGE 

1 

CATION/ 

AND | 

LENGTH 

1 

ALIGN-| 

FIER 

j SPECIFIED 

(PER 

(FOR EX- 

j FOR 

( 

PADDING 

DELIM.| 
_ __i 

(BYTES) 

| 

MENT j 

L 

RANGE 

j BY 

i _ 

(OPERAND 

4 - 

j PONENTS 

4 ... 

j SCALE 

4 

1 

«L 

SIDE 

Y ( ) | 

2 

i 

1 

1 

half | 

1 or 2 

1 

| an absolute 

T 

(multiple 

T 

1 

T 

1 

T 

1 

left 

1 


I 

word j 


(expression 

1 


1 

1 


1 



Y- 


■f- 

H 

1 

I 

1 


1 


1 

1 

2 only 

la relocatable! 

! 

1 

1 


1 



1 


|or complex 

1 

1 

I 

1 


1 


1 

1 


j relocatable 

( 

1 

I 

1 


1 


1 

1 


j expression 

1 

1 

I 

1 


_X. 

- nil 1 i m -1 111 

-X. 


Tr _ rTrT _ 1 _ r 

-X_ 

.X- 

-X-- . 

i 

_X_ 
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Appendix G. Macro Facility Summary 



The four charts in this appendix summarize 
the macro facility described in Part 2 of 
this publication. 

Figure 18 indicates which macro facility 
elements may be used in the name and 
operand entries of each statement. 

Figure 19 is a summary of the 
expressions that may be used in macro 
instruction statements. 


Figure 20 is a summary of the attributes 
that may be used in each expression. 


Figure 21 is a summary of the variable 
symbols that may be used in each 
expression. 




Statement 

Variable Symbols 

Attributes 

Sequence 

Symbol 

Global SET Symbols 

Local SET Symbols 

System Variable Symbols 

Symbolic 

Parometer 

SETA 

SETB 

SETC 

SETA 

SETB 

SETC 

&SYSNDX 

&SYSECT 

&SYSLIST 

Type 

Length 

Scaling 

Integer 

Count 

Number 

MACRO 


















Prototype 

Statement 

Name 

Operqnd 

















GBLA 


Operand 
















GBLB 
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LCLA 
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LCLC 
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Operand 

Name 

Operation 

Operand 

Name 

Operation 

Operand 

Name 

Operation 

Operand 

Name 

Operation 

Operand 

Name 

Operation 

Operand 

Name 

Operation 

Operand 

Name 

Operation 

Operand 

Nome 

Operation 

Operand 

Name 

Operation 

Operond 


■ 

m 
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■ 


COPY 


















SETA 

Operand^ 

Name 

Operand 

3 

Operand 

Operand^ 

Name 

Operand 

Operand 3 

Operand^ 





Operand 

Operand 

Operand 

Operand 

Operand 


SETB 

Operand^ 

Operand^ 

Name 

Operand 

Operand^ 

Operand^ 

Name 

Operond 

Operand^* 

Operand^ 

Operand* 

Operand^ 

Operand* 

Operand^ 

Operand^ 

Operand** 

Operand** 

Operand^ 


SETC 

^Operand 

Operand^ 

Operand® 

Name 

Operand 

Operand"^ 

Operand^ 

Operond 

Operand 

Operand 


Operand 







AIF 

Operand^ 

Operand^ 

Operand 

Operand^* 

Operand^ 

Operand 

Operand^ 

Operand^ 


Operand^ 

Operand* 

Operand** 

Operand** 

Operand^ 

Operand^ 

Operand^ 

Name 

Operand 

AGO 









B 








Name 

Operand 

ACTR 

Operand^ 

Operand 





Operand 2 

Operand 




Operand 

Operand 



Operand 


ANOP 















■ 


Name 

MEXIT 






1 E 











Name 

MNOTE 

Operand 

Operand 

Operand 

Operand 

Operand 



Operand 

Operand 

Operond 





E 


Name 

MEND 

















Name 

Outer 

Macro 


Name 

Operand 

Name 

Operand 

Name 

Operand 

Name 

Operand 

Name 

Operand 

Name 

Operand 










Name 

Inner 

Macro 

Name 

Operand 

Nome 

Operand 

Name 

Operand 

Name 

Operand 

Name 

Operond 

Name 

Operand 

Name 

Operand 

Name 

Operand 

Name 

Operand 

Name 

Operand 







Name 

Assembler 

Language 

Statement 


Name 

Operation 

Operand 

Nome 

Operation 

Operand 

Name 

Operation 

Operand 

Name 

Operation 

Operand 

Name 

Operation 

Operand 

Name 

Operation 

Operand 




■ 





B 

Name 


I . Variable symbols in macro-instructions are replaced by their values before processing. 

2. Only if value is self-defining term. 

3. Converted to arithmetic 4, 1 or +0. 

4. Only in character relations. 

5. Only in arithmetic relations. 

6. Only in arithmetic or character relations. 

7. Converted to unsigned number. 

8. Converted to character 1 or 0. 

9. Only if one to eight decimal digits. 


Figure 18. Macro Facility Elements 
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(Expression (Arithmetic Expressions 

I--1- 


Character Expressions 


(Logical Expressions | 

4-1 

(1. SETB symbols ( 

(2. Arithmetic relations 1 ! 
3. Character relations 2 | 


May 

contain 


1. Self-defining terms 

2. Length, scaling, 
integer, count, and 
number attributes 

3. SETA and SETB symbols 

4. SETC symbols whose 
value is 1-8 decimal 
digits 

5. Symbolic parameters 
if the corresponding 
operand is a self- 
defining term 

6 SSYSLlST(n) if the 

corresponding operand 
is a self-defining 
term 

7. SSYSLIST (n,m) if the 
corresponding operand 
is a self-defining 
term 

8. 6SYSNDX 


1. Any combination of 
characters enclosed 
in apostrophes 

2. Any variable symbol 
enclosed in apos¬ 
trophes 

3. A concatenation of 
variable symbols and 
other characters 
enclosed in apos¬ 
trophes 

4. A request for a type 
attribute 


Operators 

are 


and / 

parentheses permitted 


concatenation , w^.th a 
period {.) 


AND, OR, and NOT 
parentheses permitted 


Range 
of values 


-2 31 to +2 31 -1 


0 through 127 (255 for 
assembler F) characters 


0 (false) or 
1 (true) 


May be 
used in 


1. SETA operands 

2. Arithmetic relations 

3. Subscripted SET 
symbols 

4. 6SYSLIST 

5. Substring notation 

6. Sublist notation 

7. SETC operands 

8. ACTR operands 


1. SETC operands 3 

2. Character relations 2 

3. SETA operands 4 


1. SETB operands 

2. AIF operands 


1 An arithmetic relation consists of two arithmetic expressions related by the 
operators GT, LT, EQ, NE, GE, or Le. 

2 A character relation consists of two character expressions related by the operator 
GT, LT, EQ, NE, GE, or Le. The type attribute notation and the substring notation 
may also be used in character relations- The maximum length of the character 
expressions that can be compared is 127 (255 for assembler F) characters. If the two 
character expressions are of unequal length, then the shorter one will always compare 
less than the longer. 

3 Maximum of eight characters will be assigned. 

4 If one to eight decimal digits. 


Figure 19. Expressions 
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Attribute 


Notation 


May be used with: 


May be used only if 
type attribute is: 


May be used in 


Symbols outside 
macro definitions; 
symbolic parameters, 
SSYSLIST (n) , and 
SSYSLIST (n,m) inside macro 
definitions 


(May always be 
used) 


1. SETC operand 
fields 

2. Character 
relations 
(SETB) 


Length 


j.- 

| Scaling 


Symbols outside 
macro definitions; symbolic 
parameters, SSYSLIST (n) , and 
SSYSLIST (n,m) inside macro 
definitions 


Any letter except 
M,N,0,T, and U 


Arithmetic 

expressions 


Symbols outside 
macro definitions; symbolic 
parameters, SSYSLlST(n), and 
SSYSLIST (n,ra) inside macro 
definitions 


H,F,G,D,E,K,L,P, 
and Z 


Arithmetic 

expressions 


Integer 


Symbols outside 
macro definitions; symbolic 
parameters, SSYSLIST (n), and 
SSYSLIST (n,m) inside macro 
definitions 


H,F,G,D,E,K,L,P, 
and Z 


Arithmetic 

expressions 


Count 


Symbolic parameters 
corresponding to macro 
instruction operands, SSYSLIST 
(n) , and SSYSLIST (n,m) inside 
macro definitions 


Any letter 


Arithmetic 

expressions 


Number 


Symbolic parameters, 
SSYSLIST, and SSYSLIST (n) 
inside macro definitions 


Any letter 


Arithmetic 

expressions 


Figure 20.. Attributes 
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Variable 

symbol 


Defined by: 


Initialized, 
or set to: 


Value changed 
by: 


May be used in: 


Symbolic 1 

Parameter 


Prototype 

statement 


Corre sponding 
macro instruction 
operand 


(Constant 

throughout 

definition) 


1. Arithmetic expressions 
if operand is self- 
defining terra 

2. Character expressions 


LCLA or GBLA 
instruction 


SETA 

instruction 


1. Arithmetic expressions 

2. Character expressions 


LCLB or GBLB 
instruction 


SETB 

instructions 


1. Arithmetic expressions 

2. Character expressions 

3. Logical expressions 


LCLC or GBLC 
instruction 


Null character 
value 


SETC 

instruction 


1. Arithmetic expressions 
if value is one to 
eight decimal digits 

2. Character expressions 


SSYSNDX* 


The assembler 


Macro instruction 
index 


(Constant 
throughout 
definition; 
unique for 
each macro 
instruction) 


1. Arithmetic expressions 

2. Character expressions 


6SYSECT" 


The assembler 


Control section 
in which macro 
instruction 
appears 


(Constant 
throughout 
definition; 
set by CSECT, 
DSECT, and 
START) 


Character expressions 


6SYSLIST* 


The assembler 


Not applicable 


Not applicable 


N* 6SYSLIST in arithmetic 
expressions 


6SYSLIST(n) 1 
SSYSLIST (n,m) « 


The assembler 


Corresponding 
macro instruction 
operand 


(Constant 

throughout 

definition) 


1. Arithmetic expressions 
if operand is self¬ 
defining term 

2. Character expressions 


SSYSPARM 


The assembler 


Value specified 
in the OPTION 
job control 
statement 


(Constant 

throughout 

assembly) 


1. Arithmetic expression 
if value is one to 
eight decimal digits 

2. Character expressions 


j 1 May only be used in macro definitions. 

i--- 


Figure 21. Variable Symbols 
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Appendix H. Dictionary and Source Statement Sizes 


Part 1. Dictionaries Used in Macro Generation 


A. Dictionaries at Collection Time 


Two or more dictionaries must be constructed to enable the macro 
generator portion of the assembler to accomplish macro generation and 
conditional assembly: a global dictionary and one or more local 
dictionaries. 


Global Dictionary 


A global dictionary containing macro instruction mnemonics and global 
SET variable names is built for the entire program. Dictionary entries 
are fitted into blocks of fixed size, 256 bytes for Assembler (E) and 
1024 bytes for Assembler (F) 

Each block contains complete entries. If an entry cannot fit into the 
remainder of one block, it is put into the next block and bytes in the 
remainder are not used. The sizes of various kinds of dictionary 
entries are as follows: 


[Macro Mnemonic Operation Code 


I Global SET Variable Name 


Fixed Overhead 


10 bytes plus mnemonic* 
8 bytes plus mnemonic* 


(Assembler F) 
(Assembler E) 


6 bytes plus name* (Assembler F) 

8 bytes plus name* (Assembler E) 

(A dimensioned global SET variable is 
counted only once) 

8 bytes for first block 

4 bytes for each succeeding block 

5 bytes for last block 


j* One byte is used for each character in the name or mnemonic. 

i_ 


The maximum size of the global dictionary is 64 blocks. In addition, 
the maximum number of distinct global symbols for the Assembler (D) is 
400. (SSYSPARM is counted in the 14K variant.) 


Local Dictionary 

A local dictionary containing ordinary symbols relevant to macro 
generation and conditional assembly, sequence symbols and local SET 
variable names is constructed for the main portion of the program. In 
addition, a local dictionary containing an entry for each local SET 
variable name, sequence symbol and prototype symbolic parameter declared 
within a macro definition is constructed for each different macro 
definition used in the program. Dictionary entries are fitted into 
blocks of fixed size, 256 bytes for Assembler (D) and 1024 bytes for 
Assembler (F) . 

Each block contains complete entries. If an entry cannot fit into the 
remainder of one block, it is put into the next block and bytes in the 
remainder are not used. The sizes of various kinds of dictionary 
entries are as follows: 


Appendix H: Dictionary and Source Statement Sizes 153 






Sequence Symbol Names 


Local SET Variable Names 


Prototype Symbolic Parameters 

Relevant ordinary symbols 
[appearing in the main 
portion of the program 

Fixed Overhead 


10 bytes plus name” (When defined.) 

10 bytes plus name” (When first 
referenced.) 

6 bytes plus name” (A dimensioned local 
SET variable is counted only once.) 

5 bytes plus name” 

10 bytes plus name” 


8 bytes for first block (32 bytes if a 
macro local dictionary) 

4 bytes for each succeeding block 

5 bytes for last block 


| 1 One byte is used for each character in the name or mnemonic. 

L-*_ 


The maximum size for the local dictionary is 64 blocks. 
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B. Dictionaries at Generation Time 


To conserve storage during the actual conditional assembly and macro 
generation, the contents of the Global Dictionary and Local Dictionaries 
are restructured as follows: 


o 


Global Dictionary 


(N=dimension) 


Fixed Overhead 

Macro Mnemonic Operation Code 
Global SETA dimensioned 
Global SETA undimensioned 
Global SETB dimensioned 

Global SETB undimensioned 
Global SETC dimensioned 
Global SETC undimensioned 


4 bytes plus word alignment 

3 bytes 

1 byte plus 4N 

4 bytes 

1 byte plus (N/8) 

[N/8 is rounded to the next 
highest integer] 

1 byte 

1 byte plus 9N 
9 bytes 


Local Dictionary 


(N=dimension) 


Fixed Overhead 


Sequence Symbols 


Local SETA dimensioned 
Local SETA undimensioned 
Local SETB dimensioned 

Local SETB undimensioned 

Local SETC dimensioned 

Local SETC undimensioned 

Relevant ordinary symbols 
appearing in the main portion 
of the program (see Note) 


20 bytes plus word alignment 
for the' F assembler 
27 bytes plus word alignment 
for the D assembler 


5 bytes (when the size of the 

dictionary (see below) is less than 
3000, only the first 40 symbols will 
require 5 bytes each) 

1 byte plus 4N 

4 bytes 

1 byte plus (N/8) 

[N/8 is rounded to the next 
highest integer] 

1 byte 

1 byte plus 9N 

9 bytes 


5 bytes 
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Note : For the D assembler, only those ordinary symbols which appear in 

macro instruction operands are included in this table; for the F 
assembler, all ordinary symbols are included. As a result, the F 
assembler may overflow the Local Dictionary before the D assembler. 



The restructured Global Dictionary and the restructured Local 
Dictionary for the main portion of the program must be resident in main 
storage. 


In addition, if the program contains any macro instructions, main 
storage is required for the largest Local Dictionary of the macro 
definitions being processed. Furthermore, if any macro definitions 
contain inner macro instructions, main storage is required for all the 
restructured Local Dictionaries of all the macros in the nest. 

In addition to those requirements specified above for the Local 
Dictionary of the main portion of the program, each macro definition 
Local Dictionary requires the following for the parameter table: 


r - T -1 

| Fixed Overhead J 22 bytes | 



Table Entries 


F-T--j 


a. 

Character string 

j 3 bytes 

plus 

L 

b. 

Hexadecimal, binary, 
decimal, and character 
self-defining values 

| 7 bytes 

plus 

L 

c. 

Symbol 

| 9 bytes 

plus 

L 

d. 

Sublist 

| 10 bytes 

r -x- 

plus 

2N bytes plus Y 

L=Length of entry 





N=Number of entries in sublist 

Y=Total length of table entries of a., b., and c. formats 



Each nested macro instruction also requires the following: 


r- t- 

j Parameter pointer list j 2 bytes plus 2N 

I I 

|Pointers to list in table j 8 bytes plus word alignment 

b - x - 

|N=the number of operands. 

t--- 


i 


1 

I 

.j 


The size of the dictionary depends on the partition size and the 
assembler variant used. Maximum dictionary sizes for Assembler (D) 
variants in the smallest possible partitions are as follows (in bytes) : 


1 

1 

| DOS 

Assembler 

Partition 

(D) Variant 

si ze j 

1 

1 

1 OK 

1 

1 

1 

__L _ 

12K 

| 14K 

i 

1 

| 4150 

j 

1 

i 

1 

-4. 

16K 

| 10K 

1 

with tape 

work files 

--f- 

1 

1 

2050 

T 

1 

3100 

T 

1 

1 

5000 

1 

| 10K 

with disk 

work files 

1 

1 

1500 

i 

! 

i 

2400 

| 3600 

I 

1 

1 

1 

4400 

1 

| 14K 



1 

_J_ 

- 

1 

! 

.j._ 

- 

| 2750 

.J- 

1 

1 

_X_ 

3800 
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Part 2. Macro Mnemonic Table (D Assembler Only) 


As the source text is scanned, a table of macro mnemonics is constructed. There is 
an entry for each macro used or defined as a programmer macro in the program. The 
entries are made under the premise that every undefined operation is a system macro 
mnemonic. This table is then subsetted to locate and edit system macros from the 
library. 

An entry in this subsetted table consists of 9 bytes. With 10,240 or 14,336 
contiguous bytes of main storage available (see "Machine Features Required"), 
approximately 450 distinct macro mnemonics can be handled. When this table 
overflows, processing continues with only those macros defined at that point. If 
additional storage is available, this table is expanded accordingly. 


Part 3. Source Statement Complexity-Conditional Assembly and Macro Generation 


For any statement except macro prototype or macro instructions, a counter is 
increased by one for each literal occurrence of the following: 

1. Ordinary Symbol 

a. Name, operation, or operand entry (when the operand count starts, the 
counter is decremented by one) , or 

b. Operand of an EXTRN or WXTRN statement, or 

c. Operand of an attribute operator (L*,T*,1', etc.) in a SETA, SETB or SETC 
expression, or 

d. Operand of a machine or assembler instruction (only if in the main portion 
of the program) 

2. Variable Symbol 

3. Sequence Symbol 

Note 1 : The maximum value the counter may attain is 35 for the D assembler and 50 
for the F assembler. 

Note 2 : This restriction applies to the name and operation entry of a macro 
instruction or prototype taken as a unit. Each macro instruction or prototype 
operand (in sublist, each sublist operand) is also subject to the counter 
restriction. 

Examples of counts: 

1. SB2 SETB (T'NAME EQ'W' OR 'PC'.'A* EQ'AA') count=3 

2. EXTRN A, B, C, £C count=4 


Part 4. Source Statement Complexity-Assembler Statements 


A. D Assembler 


With 10,240 or 14,336 contiguous bytes of main storage available (see "Machine 
Features Required"), the size of any statement must be less than a certain limit. 
This limit is: 

1. 727 bytes for DC or DS statements. 

2. 743 bytes for all other statements. 
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There are two formulas used to estimate the size (in bytes) of a statement. 
The greater of the two calculated values (S, or S 2 ) determines whether the 
statement is less than the given limit. In general, all statements can be 
processed if they contain 50 or fewer terms. If a statement contains more than 
50 terms, the formulas should be used to determine if the statement can be 
processed, or if the statement should be shortened using eQU assembler 
instructions. (In the example for S 1# if A+ (B-C) *3 were equated to a symbol, 
that symbol could be used as the displacement field of the first operand.) The 
formulas for statement size, S< and S 2 , follow. 



S’ = N b + N d ♦ 1(N ls * N sd ) ♦ 6 (N g + N l ) 

N b = the total number of bytes in name, operation, operand, and comments 
entries. (The maximum value of N B is 187.) 

N d = the number of operators and delimiters in the operand entry (except 
equal (=) , period (.) , and apostrophe (') ] . 

N ls = the number of references to length attribute (L'SYMBOL) . 

n SD = the num fc> er °f self-defining terms. 

N s = the number of symbolic terms (including *) . 

N l = the number of literal operands. (The maximum is 1.) 

Example: 

NAME MVC A+(B-C) *3 (L'D,5) , = 15CL5'ABCDEFG * 

S*, =39+9+4 (1 + 4) +6 (3+1) 

=92 bytes 

S 2 = N B + 9(W„ + W 2 +.+ W ± + N e ) + N ed 

N b = the total number of bytes in name, operation, operand, and comments 
entries. (The maximum value of N B is 18 7) . 

W„ + W 2 . +w i+h a associated with the 1st, 2nd, 

.,i th expression. 

Wj_ = 1, if the expression is: 

a. absolute, 

b. simply relocatable, or 

c. in error. 

If the expression is complexly relocatable, Wj depends on the number of 
unpaired control section numbers (N ESD ) . 


n esd 

! wi 

1 

1 

j 1 


2, 3, 4, OR 5 

! 2 


6, 7, 8, OR 9 

! 3 


10, 11, 12, OR 

13 j 4 


14, 15, OR 16 

! 5 

_j 


N e = the number of expressions. 

N E d = the number of expression delimiters. 

The rules for counting the number of expressions (N E ) and the number of 
expression delimiters (Ned) are: 

1. Expression delimiters are commas and the terminating blank of an operand. 

2. Left and right parentheses can be part of an expression or can be 
expression delimiters. A left or right parenthesis is an expression 
delimiter if it ends an expression. Otherwise, it is part of an expression. 
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Example 1 : The operand is: 

5,6,A+20*B (6,7) 

The expression delimiters are the three commas, the left parenthesis f(] . the 
right parenthesis [) ] , and the terminating blank. 

The first, second, fourth, and fifth expressions all have a weight of 1. The 
third expression in the operand [A+20*B] has a weight of 1 (either B is absolute, 
making the result absolute or simply relocatable or, B is relocatable so the 
expression is in error. 

s 2 = n b + 9 (W x + w 2 + w 3 + w 4 + w 5 + N e ) + n ed 
S a =N B +9(1 + 1 + 1 + 1 + 1 + 5) + 6 
S a = N B + 96 bytes 
Example 2 : The operand is: 

A+17* (C-D) , (A+20) 

The number of expressions (N E ) is 2. The first expression is A+17*(X-D) . The 
second expression is (A+20) 

The number of expression delimiters (N ED ) is 2 (the comma and the terminating 
blank) . 


Example 3 : The operand is: 

20 (,3) ,16 (5) 

There are 5 expressions and 7 expression delimiters. 

( 

9 
) 

9 

( 

) 

blank 

B. F Assembler 


Expression 1 =20 
Expression 2 = 5 
Expression 3 = 3 
Expression 4 = 16 
Expression 5 = 5 


Expression 

Expression 

Expression 

Expression 

Expression 

Expression 

Expression 


Delimiter 1 
Delimiter 2 
Delimiter 
Delimiter 
Delimiter 
Delimiter 
Delimiter 


1. Generated statements may not exceed 272 characters. Statement length 
includes name, operation, operand, and comments. If a comments field 
exists, the blank separating the operand and the comments field is included 
in the statement length. The statement is truncated if it exceeds 272 
characters. 


2. DC, DS and literal DCs cannot contain more than 32 operands per statement. 


Part 5. Print Control Statement Listing Restrictions 

TITLE, SPACE and EJECT statements will not appear in the source listings unless the 
statement is continued onto another card. Then the first card of the statement will 
be listed. If any of these three statements are generated by macro expansion, they 
will not be listed (regardless of continuation) if the current PRINT option is NOGEN. 
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Appendix I. Sample Program and Assembler Listing Description 


The assembler listing consists of five 
sections, ordered as follows: external 
symbol dictionary items; the source and 
object program statements; relocation 
dictionary items; symbol cross-reference 
table; and diagnostic messages. 


The following sample program illustrates 
an actual assembler listing. Several 
errors have been included to show their 
effect on an assembly. 


Given : 

1. A TABLE with 15 entries, each 16 bytes long, having the following format: 


NUMBER < 

of 

- r 

items | 

•- ~ ~ t~ — ~ -— 

SWITCHes j ADDRESS 

r 

— T --- 

| NAME 

- j. 

3 bytes 



1 byte 4 bytes 

8 bytes 

2. A LIST 

of 

items, each 

16 bytes long, having the following format: 

NAME 

~i — 

1 

SWITCHes 

1 T 

| NUMBER of items | 

. _ i . i 

ADDRESS 

8 bytes 


1 byte 

3 bytes 

4 bytes 


Find : Any of the items in the LIST which occur in the TABLE and put the SWITCHes, 

NUMBER of items, and ADDRESS from that LIST entry into the corresponding TABLE entry. 

If the LIST item does not occur in the TABLE, turn on the first bit in the SWITCHes byte 
of the LIST entry. 

The TABLE entries have been sorted by their NAME. 
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o 

Q 

Q 

© 

© 

Q 

EXTERNAL SYMBOL DICTIONARY 

SYMBOL 

TYPE ID 

ADDR 

LENGTH LD ID 



PC 01 

000000 

0001C0 


SEARCH 

L0 

000026 

01 



EXTERNAL SYMBOL DICTIONARY (ESP) 

This section of the listing contains the 
external symbol dictionary information 
passed to the linkage editor in the object 
module. The entries describe the control 
sections, external references, and entry 
points in the assembled program. There are 
five types of entries, shown along with 
with their associated fields. The circled 
numbers refer to the corresponding heading 
in the sample listing. 


SYMBOL 


2 

TYPE 


3 

ID 


4 

ADDR 


5 

LENGTH 


6 

LDID 


SD 


LD 


ER 


PC 


\—Z~t 


CM 


X 


wx 




The X indicates entries accompanying 
each type designation. 


This column contains symbols that 
appear in the name field of CSECT or 
START statements, as operands of 
ENTRY, EXTRN, and WXTRN statements, or 
in the operand field of V-type address 

This column contains the type 
designator for the entry, as shown in 
the table. The type designators are 
defined as: 

SD--names section definition. The 

symbol appeared in the name field 
of a CSECT or START statement. 

LD—The symbol appeared as the 

operand of an ENTRY statement. 

ER—external reference. The symbol 
appeared as the operand of an 
EXTRN statement, or was defined 
as a V-type address constant. 

PC--unnamed control section 
definition. 

CM—common control section 
definition. 

WX—weak external reference. The 

symbol appeared as the operand of 
a WXTRN statement. 

This column contains the external 
symbol dictionary identification 
number (ID) . The number is a unique 
two digit hexadecimal number 
identifying the entry. It is used by 
the LD entry of the ESD and by the 
relocation dictionary to cross 
reference to the ESD. 
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© © 

EXAM SAMPLE PROGRAM 


PAGfc 



© © © 

LOC OBJECT CODE ADDR1 ADDR2 


•»* ERROR •** 


© 


© © 

© 

STMT 

SOURCE STATEMENT DOS CL3-0 

097^/6 7 

2 



SAMPL001 

3 

ft 

THIS IS THE MACRO DEFINITION • 

SAMPL002 

4 



SAMPL003 

5 


MACRO 

SAMPL0O4 

6 


MOVE CTO,EEROM 

SAMPL0U3 

7 

• * 


SAMPL006 

e 

, ft 

DEFINE SETC SYMBOL 

SAMPL007 

9 

• * 


SAMPL 008 

10 


LCLC CTYPE 

SAMPLOO'J 

H 

• * 


SAMPLOlu 

12 

• * 

CHECK NUMBER OF 0PERAN0S 

SAMPL01l 

13 

• * 


SAMPL012 

14 


AIF (N'CSYSLIST NE 21.ERR0R1 

SAMPL013 

15 

• * 


SAMPLOI4 

16 

• * 

CHECK TYPE ATTRIBUTES OF OPERANDS 

SAMPL 0 l *> 

17 

• * 


SAMPLOI6 

18 


AIF (T•CTO NE T•CFR0M).ERR0R2 

SAMPLOI7 

19 


AIF (T'CTO EQ *C' OR T'CTO EQ »G' OR T'CTO EG•K').TYPECGK 

SAMPLOI8 

20 


AIF (T'CTO EQ 'D' OR T'CTO EQ 'E' UR T'CTO EQ'H•).TYPEDEH 

SAMPL 019 

21 


AIF (T'CTO EQ 'F').MOVE 

SAMPL020 

22 


AGO .ERROR 3 

SAMPL021 

23 

.TYPEDEH AN0P 

SAMPL022 

24 

« * 


SAMPL023 

25 

• * 

ASSIGN TYPE ATTRIBUTE TO SETC SYMBOL 

SAMPL024 

26 

♦ * 


SAMPL 025 

27 

CTYPE 

SETC T'CTO 

SAMPL026 

28 

.MOVE 

AN0P 

SAMPL02/ 

29 

ft 

NEXT TWO STATEMENTS GENERATED FOR MOVE MACRO 

SAMPL028 

30 


LCTYPE 2* CFR0M 

SAMPL 029 

31 


STCTYPE 2•CTO 

SAMPL030 

32 


MEXIT 

SAMPL0 3 1 

33 

• * 


SAMPL032 

34 

• * 

CHECK LENGTH ATTRIBUTES OF OPERANDS 

SAMPL033 

35 

• * 


SAMPL 034 

36 

TYPECGK 

AIF (L'CTO NE L'CFROM OR L'CTO GT 256I.ERR0R4 

SAMPL033 

37 

ft 

NEXT STATEMENT GENERATED FOR MOVE MACRO 

SAMPL036 

38 


MVC CTO»CFROM 

SAMPL 03 7 

39 


MEXIT 

SAMPL038 

40 

• » 


SAMPL ('39 

41 

« * 

ERROR MESSAGES FOR INVALID MOVE MACRO INSTRUCTIONS 

SAMPL040 

42 

• ft 


SAMPL041 

43 

•ERR0R1 

MNOTE 1,'IMPROPER NUMBER OF OPERANDS, NO STATEMENTS GENERATED* 

SAMPL 042 

44 


MEXIT 

SAMPL043 

45 

•ERR0R2 

MNOTE 1,'OPERAND TYPES DIFFERENT, NO STATEMENTS GENERATED* 

SAM PL 04*, 

46 


MEXIT 

SAMPL 045 

47 

.ERR0R3 

MNOTE 1,'IMPROPER OPERAND TYPES, NO STATEMENTS GENERATtD' 

SAMPL046 

48 


MEXIT 

SAMPL047 

49 

. ERR0R4 

MNOTE l,'IMPROPER OPERAND LENGTHS, NO STATEMENTS GENERATED' 

SAMPL048 

50 


MEND 

SAMPL049 


The column contains the address of the 
symbol (hexadecimal notation) for SD 
and LD type entries, and zeros for ER 
and WX type entries. For PC and CM 
type entries, it indicates the 
beginning address of the control 
section. 


This column contains the assembled 
length, in bytes, of the control 
section (hexadecimal notation) . 


This column contains, for LD type 
entries, the identification (ID) 
number assigned to the ESD entry that 
identifies the control section in 
which the symbol was defined. 


SOURCE AND OBJECT PROGRAM 


This section of the listing documents the 
source statements and the resulting object 
program. 


This is the deck identification. It 
is the symbol that appears in the name 
field of the first TITLE statement. 


This is the information taken from the 
operand field of a TITLE statement. 


Listing page number. 

This column contains the assembled 
address (hexadecimal notation) of the 
object code. 
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© 










® 

EXAM 


SAMPLE 

PROGRAM 







PAGE 2 

© 


© 

© 

© 


© 


© 

© 

LOC 

OBJECT C00E 

A0DR1 

ADDR2 

STMT 

SOURCE 

STATEMENT 

DOS CL3-0 

09/lb/67 






52 


• 1 




© 

SAMPL050 






53 

ft 


MAIN 

ROUTINE 

ft 

SAMPL051 






54 


ft f 




SAMPL052 

000000 





55 



CSECT 



SAMPL053 






56 



ENTRY 

SEARCH 


SAMPL054 

000000 

05C0 




57 

BEGIN 


BALR 

R12.0 

ESTABLISH ADDRESSABILITY OF PROGRAM 

SAMPL055 

000002 





58 



USING 

*« R 12 

AND TELL THE ASSEMBLER 

SAMPL056 

000002 

9857 

C1A6 


001A8 

59 



LM 

R5,R7,=A(LISTAREA, 

16,LISTEND) LOAD LIST AREA PARAMS 

SAMPL057 

000000 





60 



USING 

LIST.R5 

REGISTER 5 POINTS TO THE LIST 

SAMPL058 

000006 

45E0 

C024 


00026 

61 

MORE 


BAL 

R14»SEARCH 

FIND LIST ENTRY IN TABLE 

SAMPL059 

OOOOOA 

9180 

C022 

00024 


62 



TM 

SWITCH.NONE 

CHECK TO SEE IF NAME WAS FOUND 

SAMPL060 

oooooe 

4710 

C018 


0001A 

63 



B0 

NOTTHERE 

BRANCH IF NOT 

SAMPL061 

000000 





64 



USING 

TABLE,Rl 

REGISTER 1 NOW POINTS TO TABLE ENTRY 

SAM PL 06 2 






65 



MOVE 

TSW1TCH.LSWITCH 

MOVE FUNCTIONS 

SAMPL063 


*** ERROR 

• ft » 














66 




1,IMPROPER OPERAND 

TYPES, NO STATEMENTS GENERATED 







67 



M0UE 

TNUMBER,LNUMBER 

FROM LIST ENTRY 



*•* ERROR 

• •• 














68 



MOVE 

TADDRESS.LADDRESS 

TO TABLE ENTRY 

SAMPL069 






69** 


NEXT 

TWO STATEMENTS GENERATED FOR MOVE MACRO 


000012 

5820 

500C 


OOOOC 

70♦ 


L 

2,LADDRESS 



000016 

5020 

1004 


00004 

714 


ST 

2,T ADDRESS 



00001A 

9680 

5008 

00008 


72 

N0TTHERE 

01 

L SWITCH,NONE 

TURN ON SWITCH IN LIST ENTRY 

SAKPLO 75 

00001E 

8756 

C004 


00006 

73 



BXLE 

R5,R6,MORE 

LOOP THROUGH THE LIST 

SAMPL 0 76 






74 



E0J 


END OF PROGRAM, USER LIBRARY MACRO 

SAMPL077 






75+* 360N- 

■CL-453 

EOJ CHANGE LEVEL 3-0 


000022 

0A0E 




764 


SVC 

14 



000024 





77 

SWITCH 


DS 

X 


SAMPL078 

000080 





78 

NONE 


E0U 

X* 80* 


SAMPL079 






79 


rftl 




SAMPL080 






80 

ft 


BINARY SEARCH ROUTINE 

ft 

SAMPL081 






81 


ft 1 




SAMPL082 

000025 

00 











000026 

947F 

C022 

00024 


82 

SEARCH 


NI 

SWITCH.255-N0NE 

TURN OFF NOT FOUND SWITCH 

SAMPL083 

00002A 

9813 

CIB2 


001B4 

83 



LM 

Rl»R3»=F*128,4*128 

• LOAD TABLE PARAMETERS 

SAMPL084 

00002E 

4111 

C046 


00048 

84 



LA 

R1,TA8LAREA-16(R1) 

GET ADDRESS OF MIDDLE ENTRY 

SAMPL035 

000032 

8830 

0001 


00001 

85 

LOOP 


SRL 

R3,l 

DIVIDE INCREMENT BY 2 

SAMPL 086 

000036 

D507 

5000 1008 00000 

00008 

86 



CLC 

LNAME,TNAME 

COMPARE LIST ENTRY WITH TABLE ENTRY 

SAMPL087 

00003C 

4720 

C04 A 


0004C 

87 



BH 

HIGHER 

BRANCH IF SHOULD BE HIGHER IN TABLE 

SAMPL 08b 

000040 

078E 




88 



BCR 

8»R 14 

EXIT IF FOUND 

SAMPL089 






89 



SR 

R1.R3 

OTHERWISE IT IS LOWER IN THE TABLE 

XSAMPL090 

000042 

1813 









SO SUBTRACT INCREMENT 

SAMPL091 

000044 

4620 

C030 


00032 

90 

MORE 


BCT 

R2,LOOP 

LOOP 4 TIMES 

SAMPL092 


•** ERROR 

• •• 









000048 

4 71-0 

C050 


00052 

91 



B 

NOTFOUND 

ARGUMENT IS NOT IN THE TABLE 

SAMPL09J 

00004C 

1A13 




92 

HIGHER 


AR 

R1 »R3 

ADD INCREMENT 

SAMPL094 

00004E 

4620 

C030 


00032 

93 



BCT 

R2.L00P 

LOOP 4 TIMES 

SAMPL095 

000052 

9680 

C022 

00024 


94 

N0TF0UND 

01 

SWITCH,NONE 

TURN ON NOT FOUND SWITCH 

SAMPL096 

000056 

07FE 




95 



BR 

R 14 

EXIT 

SAMPL097 


This column contains the object code 
produced by the source statement. The 
entries are always left-justified. 

The notation is hexadecimal. Entries 
are machine instructions or assembled 
constants. Machine instructions are 
printed in full with a blank inserted 
after every four digits (two bytes). 
Constants may be only partially 
printed (see the PRINT assembler 
instruction in "Assembler Instruction 
Statements") . 


These two columns contain effective 
addresses (the result of adding 
together a base register value and 
displacement value) : 


1. The column headed ADDR1 contains 
the effective address for the 
first operand of an SS or an SI 
instruction. 


2. The column headed ADDR2 contains 
the effective address of the 
second operand of any instruction 
referencing storage. 


Both address fields contain six 
digits; however, if the high order 
digit is a zero, it is not printed. 
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LOC 

OBJECT CODE A00R1 A00R2 

STMT 

SOURCE 

STATEMENT 

DOS CL3-0 09/16/6/ 




97 

• 



SAMPL099 




98 

• 

THIS 

IS THE TABLE 

SAMPL100 




99 

ft 



SAMPL101 

000058 



100 


OS 

OD 

SAMPL102 

000058 

0000000000000000 


101 

TABLAREA 

oc 

XL 8'0 1 

SAMPL103 

000060 

C1D3D7C8C1404040 


102 


DC 

CL8'ALPHA’ 

SAMPL104 

000068 

0000000000000000 


103 


OC 

XL8'0’ 

SAMPL105 

000070 

C2C5E3C140404040 


104 


DC 

CL8*BETA’ 

SAMPL106 

000078 

0000000000000000 


105 


DC 

XL 8*0* 

SAMPL107 

000080 

C4C5D3E3C1404040 


106 


DC 

CL8’DELTA’ 

SAMPL108 

000088 

0000000000000000 


107 


DC 

XL8'0' 

SAMPL109 

000090 

C5D7E2C903D6D540 


108 


DC 

CL8'EPSIL0N’ 

SAMPL110 

000098 

0000000000000000 


109 


DC 

XL 8•0 * 

SAMPL 111 

OOOOAO 

C5E3C14040404040 


110 


DC 

CL 8'ETA* 

SAMPL 112 

0000A8 

0000000000000000 


111 


DC 

XL 8 *0 • 

SAMPL 113 

C000B0 

C7C1D404C1404040 


112 


DC 

CL 8 ‘GAMMA• 

SAMPL114 

00006 8 

OOGOOOOOOOOOOOOO 


113 


DC 

XL8 *0' 

SAMPL 115 

ooooco 

C9D6E3C140404040 


114 


DC 

CL8*IOTA* 

SAMPL 116 

0000C8 

0000000000000000 


115 


DC 

XL 8 *0 • 

SAMPL11 7 

OOOODO 

D2CID7D7C1404040 


116 


DC 

CL8’KAPPA’ 

SAMPL 116 

000008 

0000000000000000 


117 


DC 

XL 8•0• 

SAMPL 119 

C000E0 

03C1D4C2C4C14040 


118 


DC 

CL8'LAMBDA• 

SAMPL120 

OOOOE8 

0000000000000000 


119 


DC 

XL8 *0 • 

SAMPL121 

0000F0 

04E4404040404040 


120 


DC 

CL 8'MU' 

SAMPL122 

0000F8 

0000000000000000 


121 


DC 

XL 8'0 • 

SAMPL123 

000100 

05t4404040404040 


122 


DC 

CL8•NU' 

SAMPL124 

000108 

0000000000000000 


123 


DC 

XL8'0• 

SAMPL 125 

000110 

0604C9C3D9D6D540 


124 


DC 

CL8•OMIC RON• 

SAMPL 126 

000118 

F040404040404040 


125 


OC 

CL 8 *0 • 

SAM PH 2 7 

000120 

07C8C94040404040 


126 


DC 

CL 8’PHI• 

SAMPL126 

C00128 

0000000000000000 


127 


OC 

XL 8 *0• 

SAMPL129 

000130 

E2C9C7D4C1404040 


128 


oc 

CL8 •SIGMA* 

SAMPL130 

G00138 

0000000000000000 


129 


DC 

XL 8•0 • 

SAMPL131 

000140 

E9C5E3C140404040 


130 


DC 

CL8'ZETA’ 

SAMPL132 




131 

ft 



SAMPL133 




132 

ft 

THIS 

IS THE LIST 

SAMPL134 




133 

ft 



SAMPL135 

000148 

D3C 104C2C4C14040 


134 

LISTAREA 

DC 

CL8'LAMBDA* 

SAMPL136 

000150 

0A 


135 


DC 

X • OA * 

SAMPL137 

000151 

000010 


136 


DC 

FL3’29’ 

SAMPL13U 

000154 

00000000 


137 


DC 

A(BEGIN) 

SAMPL139 

000158 

E9C5E3C140404040 


138 


OC 

CL8’ZETA* 

SAMPL140 

000160 

05 


139 


OC 

X ■ 05 • 

SAMPL141 

000161 

000005 


140 


OC 

FL3’5’ 

SAMPL142 

000164 

00000032 


141 


DC 

A(LOUP) 

SAMPLl43 

000168 

E3C8C5E3C1404040 


142 


DC 

CL8 ’THETA• 

SAMPL144 

000170 

02 


143 


DC 

X *02* 

SAMPL145 

000171 

00002D 


144 


DC 

FL3’45* 

SAMPL146 

000174 

00000000 


145 


DC 

A(BEGIN) 

SAMPL147 

000178 

E3C1E44040404040 


146 


DC 

CL 8'TAU* 

SAMPL148 

000180 

00 


147 


DC 

X’OO* 

SAMPL149 


This column contains the statement 
number. A plus sign (+) to the right 
of the number indicates that the 
statement was generated as the result 
of macro instruction processing. The 
maximum statement number is 65,535. 

If there are more than 65,535 
statements, the statement number 
wraps-around. 

This column contains the source 
program statement. The following 
items apply to this section of the 
listing: 

a. Source statements are listed, 

including those brought into the 
program by the COPY assembler 


instruction, and macro 
definitions submitted with the 
main program for assembly. 
Listing control instructions are 
not printed, except for the 
following case: PRINT is listed 
when PRINT ON is in effect and a 
PRINT statement is encountered. 


b. Macro definitions for system 
macro instructions are not 
listed. 

c. The statements generated as the 
result of a macro instruction 
follow the macro instruction in 
the listing. 
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LOC 

OBJECT CODE A0DR1 A0DR2 

STMT 

SOURCE 

STATEMENT 

DOS CL3- 

0 09/16/67 

000181 

000000 


148 


DC 

FL 3 1 0 • 


SAMPL130 

000184 

00000001 


149 


DC 

At 1) 


SAKPL151 

000188 

D3C9E2E340404040 

150 


DC 

CL 8 *L I ST' 


SAMPL152 

000190 



151 


DC 

X' 1G • 


SAMPL153 


*** ERROR *•* 







000190 

0001C8 


152 


DC 

FL 3 *456 • 


SAMPL154 

000193 

00 








000194 

00000000 


153 


DC 

A(0) 


SAMPL155 

000198 

C1D307C8C1404040 

154 

U STEN0 

DC 

CL 8•ALPHA’ 


SAMPL156 

0001A0 

00 


155 


DC 

X»00* 


SAKPLl5 7 

0001A1 

000001 


156 


DC 

FL3 * 1' 


SAMPL158 

0001A4 

00000078 


157 


DC 

At 1231 


SAMPL159 




158 

• 




SAMPL160 




159 

• 

THESE 

ARE THE SYMBOLIC REGISTERS 


SAMPL161 




160 

* 




SAMPL162 

000001 



161 

R1 

EQU 

1 


SAMPL163 

000002 



162 

R2 

EQU 

2 


SAMPL164 

000003 



163 

R3 

ECU 

3 


SAKPL165 

000005 



164 

R5 

EQU 

5 


SAMPL 16c> 

000006 



165 

R6 

EQU 

6 


SAMPL16/ 

000007 



166 

R7 

EQU 

7 


SAMPL 168 

oooooc 



167 

R12 

EQU 

12 


SAMPL169 

0000OE 



168 

R14 

EQU 

14 


SAMPL170 




169 

» 




SAMPL171 




170 

* 

THIS 

IS THE FORMAT DEFINITION OF LIST ENTRIES 


SAMPL172 




171 

• 




SAMPL173 

cooooo 



172 

LIST 

DSECT 



SAMPL l 74 

000000 



173 

LNAME 

DS 

CL8 


SAMPL 175 

000008 



174 

LSWITCH 

DS 

C 


SAMPL176 

000009 



175 

LNUMBER 

DS 

FL3 


SAMPL177 

oooooc 



176 

LADDRESS 

DS 

F 


SAMPL178 




177 

• 




SAMPL179 




178 

• 

THIS 

IS FORMAT DEFINITION OF TABLE ENTRIES 


SAMPL180 




179 

• 




SAKPL181 

000000 



180 

TABLE 

DSECT 



SAMPLl82 

cooooo 



181 

TNUMBER 

DS 

EL 3 


SAMPL183 

000003 



182 

TSWITCH 

DS 

C 


SAMPL184 

000004 



183 

TA00RESS 

DS 

F 


SAMPL185 

C00008 



184 

TNAME 

DS 

CL8 


SAKPL186 

cooooo 



185 


EN0 

BEGIN 


SAMPL187 

0001A8 

0000014800000010 

186 



=AtLISTAREA,16iLISTEND) 



000164 

0000008000000004 

187 



*F*128,4,128' 




d. Assembler or machine instructions 
in the source program that 
contain variable symbols are 
listed twice: as they appear in 
the source input, and with values 
substituted for the variable 
symbols. 

e. Diagnostic messages are not 
listed inline in the source and 
object program section. An error 
indicator, ***ERROR***, appears 
following the statement in error. 
The message appears in the 
diagnostic section of the 
listing. 

f. MNOTE messages are listed inline 
in the source and object program 
section. An MNOTE indicator 
appears in the diagnostic section 
of the listing. The MNOTE 
message format is: severity 
code, message text. 

g. The MNOTE * form of the MNOTE 
statement results in an inline 


message only. An MNOTE indicator 
does not appear in the diagnostic 
section of the listing. 

h. When an error is found in a 
programmer macro definition, it 
is treated like any other 
assembly error: the error 
indication appears after the 
statement in error, and a 
diagnostic is placed in the list 
of diagnostics. However, when an 
error is encountered during the 
expansion of a macro instruction 
(system or programmer defined), 
the error indication appears in 
place of the erroneous statement, 
which is not listed. The error 
indication appears following the 
last statement listed before the 
erroneous statement was 
encountered, and the associated 
diagnostic message is placed in 
the list of diagnostics, 

i. Literals will appear in the 
listing following an LTORG or the 
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POS. ID 

REL.I0 

FLAGS 

ADDRESS 

01 

01 

OC 

000154 

01 

01 

OC 

000164 

01 

01 

0C 

000174 

01 

01 

OC 

0001A8 

01 

01 

OC 

0001B0 


END statement or both. Literals 
are identified by the equals (=) 
sign preceding them. 

j. If the END statement contains an 
operand, the transfer address 
appears in the location column 
(LOC) . 

k. In the case of COM, CSECT, and 
DSECT statements, the location 
field contains the beginning 
address of these control sections 
i.e., the first occurrence. 

l. For a USING statement, the 
location field contains the value 
of the first operand. 

m. For LTORG and ORG statements, the 
location field contains the 
location assigned to the literal 
pool or the value of the ORG 
operand. 

n. For an EQU statement the location 
field contains the value 
assigned. 

o. Generated statements always print 
in normal statement format. 
Because of this, it is possible 
for a generated statement to 
occupy two or more continuation 
lines on the listing. This is 
unlike source statements which 
are restricted to one 
continuation line. 


This field indicates the assembler 
level and version number, e.g., DOS 
CL2-1 reads as DOS assembler level 2, 
version 1. 

Current date obtained from SET card. 

Identification-sequence field from the 
source statement. 


RELOCATION DICTIONARY 

This section of the listing contains the 
relocation dictionary information passed to 
the linkage editor in the object module. 

The entries describe the address constants 
in the assembled program that are affected 
by relocation. 


This column contains the external 
symbol dictionary ID number assigned 
to the ESD entry that describes the 
control section in which the address 
constant is used as an operand. 


This column contains the external 
symbol dictionary ID number assigned 
to the ESD entry that describes the 
control section in which the 
referenced symbol is defined. 


166 




20 


The two-digit hexadecimal number in 
this column is interpreted as follows: 

First Digit—a zero indicates that the 
entry describes an A-type, a Y-type, 
or a CCW address constant; 

Second Digit—the first three bits of 
this digit indicate the length and 
sign of the address constant as 
follows: 


Bits 0 and 1 Bit 2 

00=1 byte 0 = + 

01 = 2 bytes 1 = - 

10 = 3 bytes 

11 = 4 bytes 


This column contains the assembled 
address of the field where the address 
constant is stored. 
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l. IV 

ujj-ncrcnciiuc 

SYMBOL 

LEN 

VALUE 

0EFN 





BEGIN 

00002 

000000 

00057 

0137 

0145 

0185 


HIGHER 

00002 

00004C 

00092 

0087 




LADDRESS 

00004 

oooooc 

00176 

0070 




LIST 

00001 

000000 

00172 

0060 




LISTAREA 

00008 

000148 

00134 

0059 

0186 



LISTEND 

00008 

000198 

00154 

0059 

0186 



LNAME 

00008 

000000 

00173 

0086 




LNUMBER 

00003 

000009 

00175 





LOOP 

00004 

000032 

00085 

0090 

0093 

0141 


LSWITCH 

00001 

000008 

00174 

0072 




MORE 

00004 

000006 

00061 

0073 




MORE 

00004 

000006 

00090 





NONE 

00001 

000080 

00078 

0062 

0072 

0082 

0094 

NOTFOUNO 

00004 

000052 

00094 

0091 




NOTTHERE 

00004 

00001A 

000 72 

0063 




R1 

00001 

000001 

00161 

0064 

0083 

0084 

0084 0089 0092 

R 12 

00001 

OOOOOC 

00167 

0057 

0058 



R14 

00001 

00000E 

00168 

0061 

0068 

0095 


R 2 

00001 

000002 

00162 

0090 

0093 



R3 

00001 

000003 

00163 

008 3 

0085 

0089 

0092 

R 5 

00001 

000005 

00164 

0059 

0060 

0073 


R6 

00001 

000006 

00165 

0073 




R 7 

00001 

000007 

00166 

0059 




SEARCH 

00004 

000026 

00082 

0056 

0061 



SWITCH 

00001 

000024 

000 77 

0062 

0082 

0094 


TABLAREA 

00008 

000058 

00101 

0084 




TABLE 

00001 

000000 

00180 

0064 




TAODRESS 

00004 

000004 

00183 

0071 




TNAME 

00008 

000008 

00184 

0086 




TNUMBER 

00003 

000000 

00181 





TSWITCH 

00001 

000003 

00182 






PAGE l 


CROSS-REFERENCE 


This section of the listing information 
concerns symbols—where they are defined 
and used in the program. 


This column contains the symbols. 


This column states the length (decimal 
notation) , in bytes, of the field 
occupied by the symbol value. 


This column contains either the 
address the symbol represents, or a 
value to which the symbol is equated. 


This column contains the statement 
number of the statement in which the 
symbol was defined. 


This column contains the statement 
numbers of statements in which the 
symbol appears as an operand. 


The following notes apply to the 
cross-referencing section: 


Symbols appearing in V-type address 
constants do not appear in the 
cross-reference listing. 


• A PRINT OFF listing control 

instruction does not affect the 
production of the cross-reference 
section of the listing. 


Undefined symbols appear in the 
cross-reference section. However, 
only the symbol column and the 
reference column have entries. 
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STMT 

ERROR CODE 

MESSAGE 




36 

I JQ073 

ILLEGAL NAME FIELD 




65 

IJG059 

UNDEFINED SEQUENCE SYMBOL 




66 

lJ0037 

MNOTE STATEMENT 




67 

IJU08S 

UNDEFINED OPERATION CODE 




90 

IJQ023 

PREVIOUSLY DEFINED NAME 




151 

lJ0039 

INVALID DELIMITER 




6 

STATEMENTS 

FLAGGED IN THIS ASSEMBLY 





DIAGNOSTICS 


This section contains the diagnostic 
messages issued as a result of error 
conditions encountered in the program. 
Explanatory notes for each message are 
contained in Appendix N. 


This column contains the number of the 
statement in error. 


This column contains the message 
identifier. 


This column contains the message. 


The following notes apply to the 
diagnostics section: 


An MNOTE indicator of the form MNOTE 
STATEMENT appears in the diagnostic 
section, if an MNOTE statement is 
issued by a macro instruction. The 
MNOTE statement itself is inline in 
the source and object program section 
of the listing. 


• A message identifier consists of six 
characters and is of the form: 


IJQxxx 


IJYxxx 


IJQ 

identifies the issuing agent as 
DOS/TOS D assembler. 


1JY 

identifies the issuing agent as 
DOS F assembler. 


XXX 

is a unique number assigned to the 
message. 

Two statistical messages may appear in 
the listing. They are: 


1. A message indicating the total 

number of statements in error. If 
no statements are in error, the 
message 


NO STATEMENTS FLAGGED IN THIS 
ASSEMBLY 


is printed following the 
Cross-Reference section and no 
diagnostic section is printed. 


2. A message if one or more Y-type 
address constants appear in the 
program. 


AT LEAST ONE RELOCATABLE Y-TYPE 
CONSTANT IN ASSEMBLY. 


This message if issued, appears 
before the diagnostic section. 
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Appendix J. Assembler Language-Features Comparison Chart 


Features not shown below are common to all assemblers. In the chart: 

Dash = Not allowed. 

X = As defined in IBM Operating System/360 Assembler Language , GC28-6514. 
Op(s)= Operand (s) . 


T-1 

OS/360 
Assembler 
DOS F 
Assembler 


C COL LULC 


Model 20 

Basic 

Assembler 


BPS/360: 

Basic 

Assembler 


7090/7094 

Support 

Package 

Assembler 


BPS 8K Tape 
BOS 8K Disk 
Assemblers 


DOS,TOS 
D Assem¬ 
blers 


No. of Continuation 
Cards/Statement 
(exclusive of macro 
instructions) 


0 


0 


0 


Input Character 
Code 


EBCDIC 


EBCDIC 


BCD 

EBCDIC 


EBCDIC 


EBCDIC 


EBCDIC 


ELEMENTS: 


Maximum Characters 
per symbol 


Character 

self-defining terms 


1 Char only 


1 Char only 


Binary self-defining 
terms 


Length attribute 
reference 


Literals 




Extended mnemonics 


X 

2 24-1 




-1 


Maximum location 
counter value 


2 14-1 


2 16-1 


2 24_1 


224-1 


2 24_ i 


Multiple Control 
Sections per 
assembly 


EXPRESSIONS: 


Operators 


+ - 
3 


+-* 


+-*/ 


+-*/ 


♦-♦/ 


+-*/ 


Number of terms 


16 


Levels of 
parentheses 


16 


16 

5 


Complex 

relocatability 


.x - J 

(Part 1 of 3) 
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Feature 


Model 20 

Basic 

Assembler 


BPS/360: 

Basic 

Assembler 


7090/7094 

Support 

Package 

Assembler 


BPS 8K Tape 
BOS 8K Disk 
Assemblers 


DOS,TOS 
D Assem¬ 
blers 


OS/360 
Assembler 
DOS F 
Assembler 


ASSEMBLER 
INSTRUCTIONS: 


DC and DS 


Expressions allowed 
as modifiers 


Multiple operands 


Less than 
33 


Multiple constants 
in an operand 


Except 
Address 
Consts. 


Bit length 
specifications 


Scale modifier 


Exponent Modifier 


DC types 


Only 

C,X r 

H,Y,Q 


Except 

B,P,Z, 

V,Y,S,Q,L 


Except 

B,V,Q,L 


Except Q 


Except Q* 


DC duplication 
factor 


Except Y 


Except A 


Except S 


DC duplication 
factor of zero 


Except Y 


Except S 


DC length modifier 


Except 

H,Y 


Except 

H,E,D 


DS types 


Only C, 
H,F,D 


Only C, 
H,F,D 


DS length modifier 


Only C 


Only C 


Only C 


DS maximum length 
modifier 


65,535 


65,535 


DS constant subfield 
permitted 
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Feature 


PRINT 

TITLE 

COM 

ICTL 


USING 


Model 20 

Basic 

Assembler 


2 ops (op 1 
relocatable 


1 op only 


BPS/360j 

Basic 

Assembler 


1 op (1 or 
25 only) 


2 ops (op 1 
relocatable 
cnl y) 


1 op only 


op 2 (relo¬ 
catable 
only) 


ORG 

jno blank opjno blank opjno blank 

1 1 lop 

. X. _L 

|x 

1 

j._ 


IX 

1 

_ i 

i x 
i 


ENTRY 

r 

| 1 op only 

i 

T 

| 1 op only 

i 

T T 

j1 op only|1 op 

-j. j. 

only 

—t ^ — 

|X 

4 . 

1 X 

4 .._ . 


EXTRN 

» 

| 1 op only 

1 

i . . . 

T 

| 1 op only 
| (max 14) 

. i...... 

T 

|1 op only 
1 

i_ . .„ 

J1 op 

1 

only 

—r. - 

IX 

1 

_j -. . . 

T 

1 x 

1 

4 . 


WXTRN 

r 

1 

i _ . . 

1— 

1 

i .. .. 

T 

1 

i . .. 

_ 

1 


{DOS 14K 
JD only 

1 ... 

T 

1 

4_ 


CNOP 

r --——-- 

1 

. i.. 

t 

12 decimal 
j digits 

T 

J 2 decimal 
j digits 

i . 

T 

J2 decimal 
{digits 

-i 

T--- 

|X 

i 

t -. 

T 

1 x 

1 

4 .. 


PUNCH 

r 

4_ 

T 

-4 

T 

J. 

T- 

|X 

J._ 


T . 

|X 

4 

T — 

1 x 

4 . _. 


REPRO 

r- ■ 

r 

. 1 . . 

T 

4 

T- 

|X 

I_ 


—... ,. - 

IX 

4 __ 

T ” . 

1 x 

4 


Macro 

Instructions 

f 

S/360 
|Model 20 
(IOCS only 

1 

! 

1 

T 

1 

i 

T- 

|X 

! 

1 


T - 

IX 

1 

1 

T - 

1 x 

i 

1 

1 



7090/7094 

Support 

Package 

Assembler 


2-17 (ops 
relocat¬ 
able 
only) 


BPS 8K Tape 
BOS 8K Disk 
Assemblers 


6 ops 


5 ops 
X 


DOS,TOS 
D Assem¬ 
blers 


OS/360 
Assembler 
DOS F 
Assembler 
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(Macro Facility Features 


BPS 8K Tape, 
BOS 8K Disk 
Assemblers 


DOS, TOS 
Assemblers 


OS/360 

Assembler 


Operand Sublists j — j X j X j 

Attributes of macro instruction operands inside macroj J X | X | 

definitions and symbols used in conditional assembly | III 

instructions outside macro definitions. J III 

Subscripted SET symbols j — j X j j 

Maximum number of operands j 49 | 100* |200 j 

Conditional assembly instructions outside macro j — j X I X j 

definitions 1111 

Maximum number of SET symbols j III 

global SETA ( 16 | + |+ | 

global SETB | 128 | + |+ | 

global SETC | 16 | + | + | 

local SETA | 16 | + | + | 

I III 

local SETB (128 j + |+ j 

local SETC | 0 | + |+ j 

1 Maximum number of operands in DOS assembler F is 200. j 

+ The number of SET symbols permitted by the Disk and Tape Operating Systems Assemblers] 
and the IBM System/360 Operating System Assembler is variable, dependent upon the j 
available main storage. | 

Note : The maxiniunt size of a character expression is 127 in DOS (assembler D) and TOS j 
and 255 characters in OS and DOS (assembler F) . j 
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Appendix K. Card Input for Assembly Runs 


Figure 22 lists the control cards necessary to assemble a program. The card groups are 
listed in the order in which they must appear. All job control cards enter the system 
via SYSRDR, all others via SYSIPT. The same device may be assigned for both SYSRDR and 
SYSIPT. If this device is a disk file, the combined file must be designated as SYSIN. 
Job control statements are described in the publications IBM System/360 Disk Operating 

System; System Control and System Service Programs or IBM System/360 Tape Operating 

System: System Control and System Service Programs . 


I-T- 

|Card Group |Card Arrangement 

j.--j-- 

Job Control J// JOE .... 


ASSGN SYSCLB 

// ASSGN SYSSLB,, 

// ASSGN SYSIPT,, 

// ASSGN SYSLST,. 

// ASSGN SYSOO1,. 
// ASSGN SYS002,. 
// ASSGN SYS003,. 

// ASSGN SYSPCH,. 

// ASSGN SYSLNK,. 

// OPTION DECK,.. 

// EXEC ASSEMBLY 


Comments 


| First card in group, always required. 

Used when the core image library is on a separate 
(private) file (see Note 3) . 

Used when the source statement library is on a 
separate (private) file. 1 

Source program input. 

Program listing. 


Work files. 

Required when DECK option is specified. 

Required when assemble-and-execute is specified. 

Optional. Used to indicate desired assembler 
functions. 

Required. 


Assembler 

Input 


Source Deck 


/* 


Source statements (machine, 
assembler, and macro instructions) 

Indicates end-of-data set. 


Job Control j/S 

___ L _ 


End-of-job statement, 


1 SYSSLB is assigned as follows; 

For DOS—SYSSLB cannot be assigned for the 10K assembler. If SYSSLB is assigned for 
the 14K D assembler or the F assembler, it is concatenated with the source statement 
library on SYSRES. (The assembler searches first SYSSLB and then the SYSRES 
library.) The 10K D assembler and if SYSSLB is not assigned the 14K D and F 
assemblers use only the source statement library of SYSRES. 

For TOS—Both TOS assembler variants use either SYSSLB or the source statement 
library on SYSRES. They use SYSSLB if it is assigned. If it is not assigned, they 
use the SYSRES library. 


1 74 


Figure 22. Card Input for an Assembly (Part 1 of 2) 










r-1 

( Note 1 : Only those assignments and options not already in effect are required. j 

( Note 2 : Assignments for SYSIN and/or SYSOUT must be accomplished by permanent j 

jassignments. For details see the publications for DOS and TOS system control and j 

jsystem service programs. j 

I Note 3 : Normally the assembler and the linkage editor can be executed in the j 

jbackground only. However, in a Disk Operating System that supports the batched-job j 

(foreground and private core image library options, the assembler and the linkage editorj 
jean also be executed in any of the foreground partitions provided that the partition isj 

|2K bytes larger than the minimum main storage area required by the assembler; then the | 

(appropriate private core image library must be assigned instead of the library on the j 
jsystem residence device (SYSRES). A private core image library must be assigned with aj 
jjob control command (a job control command differs from a job control statement in thatj 
jit does not have slashes in columns 1 and 2), which makes it a permanent assignment. j 
jit remains in effect until another ASSGN command for SYSCLB is encountered. j 

L-J 


Figure 22. Card Input for an Assembly (Part 2 of 2\ 
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|Symbolic UnitJRemarks 

f -f- 


SYSRDR 


SYSIPT 


SYSIN 


SYSLST 


SYSPCH 


Required if the SYSIN 
option is not used. 


| Function and Device 
. + - 


Required if the SYSIN 
option is not used. 


Required for combined 
disk input. 

Optional for combined 
card or tape input. 


Required if the SYSOUT 
option is not used. 


Optional. 


Job control statement input device. Way be the 
same device as SYSIPT except for combined input 
from IBW 2311, 2314, or 2319 Disk Extent (see 
SYSIN) . 


IBW 1442, 2520, or 2540 Card Read Punch, IBM 2501 
Card Reader, IBW 2400-series Magnetic Tape Unit, 
or IBM 2311, 2314 or 2319 Disk Extent for the 
disk system. 


Source program input device. May be the same 
device as SYSRDR except for combined input from 
IBM 2311, 2314, or 2319 Disk Extent (see SYSIN). 

IBM 1442, 2520, or 2540 Card Read Punch, IBM 2501 
Card Reader, IBM 2400-series Magnetic Tape Unit 
(7-or 9-track) , or IEM 2311, 2314, or 2319 Disk 
Extent for the disk system. If the Data 
Conversion feature was used to prepare the 
7-track tape, it must also be used to read the 
tape. The tape or disk records must be 80-byte 
unblocked records. 


Used for a combined input file for SYSRDR 
and SYSIPT. 

IBM 1442, 2520, or 2540 Card Read Punch, IBM 2501 
Card Reader, IBM 2400-series Magnetic Tape Unit, 
or IBM 2311, 2314, or 2319 Disk Extent for the 
disk system. 

SYSIN can be used in lieu of the SYSDR and SYSIPT 
designation when the file is card or tape input. 
It must be used when the file is disk input (disk 
system only) . 


Program listing device. 


IBM 1403, 1404 (continuous forms only) , or 1443 
Printer. IBM 2400-series Magnetic Tape Unit 
(9-track, or 7-track with or without the Data 
Conversion feature) or IEM 2311, 2314, or 2319 
Disk Extent for the disk system. 

Listing on tape or disk appears as 121-character 
print images (a single forms control followed by 
a 120-character line image). 


Object program output device. 

IBM 1442, 2520, or 2540 Card Read Punch. IEM 
2400-series Magnetic Tape Unit (9-track, or 
7-track with the Data Conversion feature), or IEM 
2311, 2314, or 2319 Disk Extent for the system. 

Output on tape or disk is in 81-byte unblocked 
records. 

Not used when the assemble-and-execute or the 
NODECK option is specified. 


Figure 23. Device Assignments (Part 1 of 2) 
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(Symbolic UnitJRemarks 

I-- f - 


j Function and Device 


SYSOUT 


Optional 


Used for a combined output file for SYSLST and 
SYSPCH to a single tape unit. 

IBM 2400-series Magnetic Tape Unit (9-track, or 
7-track with the Data Conversion feature). 


SYSLNK 


Optional 


Used for temporary storage of assembler output. 
Required only when the assemble-and-execute 
option is specified. 

IBM 2400-series Magnetic Tape Unit (9-track, or 
7-track with the Data Conversion feature) for the 
tape system or IBM 2311, 2314, or 2319 Disk 
Extent for the disk system. This extent may be 
on the same device that contains the COS resident 
system. 


SYSOO 1 
SYS002 
SYSOO3 


Required 


Used for temporary work area during assembly. 

IBM 2400-series Magnetic Tape Unit (9-track, or 
7-track with the Data Conversion feature) for 
either the tape or disk systems or three IBM 
2311, 2314, or 2319 Disk Extents for the disk 
system. These extents may be on the same device 
that contains the DOS resident system. 

For details of work file assignement, see the 
publication for DOS system generation. 


SYSCLB 


Optional 


May be used only on a EOS system that supports 
the private core image library option. Must be 
the same device type as SYSRES. See also Note 3 
in Figure 22. 


SYSSLB 


Optional 


Must be same device as SYSRES. See Appendix M, 
Figure 31. 


Note : The 2311, 2314, or 2319 can be used for one or more of the symbolic units 
SYSRDR, SYSIPT, SYSIN, SYSPCH, or SYSLST only if a supervisor has been SYSGEN'd that 
can accommodate input from disk storage or output to disk storage for these units. For 
details see the DOS system generation manual. 


Figure 23. Device Assignments (Part 2 of 2) 


r- 1 

I Input and Output Using an IBM 14 42 or 2520 Card Read Punch : Whenever an IBM 1442 or | 
|2520 Card Read Punch is assigned tc SYSRDR , SYSIPT, or SYSIN and also to SYSPCH, a j 

jnumber of blank cards sufficient for punching the output deck must follow the /* card j 
jfollows the assembler END statement in the source deck. This is to prevent erroneously! 
jpunching the cards of a following job step. Any extra cards that are not needed are | 
(automatically bypassed. j 

i—--j 

Figure 24. Operating Considerations 
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jCard Group 

F- 

Job Control 


|Card Arrangement 
^// JOB , . . 

// ASSGN SYSRLB.. 


// ASSGN SYSSLB.« 

// ASSGN SYSIPT.. 

// ASSGN SYSLST.. 

// ASSGN SYSINK.. 

// ASSGN SYSOO1.. 
// ASSGN SYS002.. 
// ASSGN SYSOO3.. 

// OPTION LINK... 
// EXEC ASSEMBLY 


j Comments 

4 - 

First card in group, always required. 

Used by the linkage editor when the relocatable 
library is on a separate (private) file and 
previously assembled modules are to be included. 

Used when the source statement library is on a 
separate (private) file.' 1 

Source program input. 

Program listing. 

Required for assemble-and-execute. 


Work files. 


Required. Used to indicate LINK option and any 
additional assembler functions desired. 

Required. 


Assembler Input 
Source Deck 


/* 


Source statements (machine, assembler, and 
macro instructions) Note : If the operand of the 
END statement is omitted, a PHASE card must 
precede the // EXEC ASSEMBLY card or an ENTRY 
card must follow the END statement (tape system 
only) . 

Indicates end-of-data set. 


Job Control 


ENTRY... 

// EXEC LNKEDT 
// EXEC 


Calls the linkage editor. 


Data 


Data, if any 
/* 


End-of-data set indicator. 


Job Control 


l/e 


j End-of-job statement. 
.x --- 


* See Figure 22. 

Note 1 : Only those assignments and options not already in effect are required. 


Note 2 : Assignments for SYSIN and/or SYSOUT must be accomplished by permanent 
assignments. For details see the publications for DOS and TOS system control and 
system service programs. 


Figure 25. Card Input for Assembly, Linkage Editing, and Execution 
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(Optional) 

^ See Figure 25. 


Figure 26. I/O Units Used by the Tape Assembler 
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Assemble-and-execute 


Assemble-and-execute 
(Include object 
routines from the 
relocatable library) 


Assemble-and-execute 
(Include object 
routines from cards) 


Assemble-and-execute 
(Include object 
routines from the 
relocatable library 
and from cards 


// JOB... 

// ASSGN SYSIPT., 

// ASSGN SYSLST, 

// ASSGN SYS001,. 
// ASSGN SYS002, 
// ASSGN SYS003,, 

// ASSGN SYSLNK,. 

// OPTION LINK,.. 

// EXEC ASSEMBLY 


// JOB... 

// ASSGN SYSIPT.. 

// ASSGN SYSLST, . 

// ASSGN SYS001,. 
// ASSGN SYS002,. 
// ASSGN SYS003,. 

// ASSGN SYSLNK,. 

// OPTION LINK,.. 

// EXEC ASSEMBLY 


// JOB... 

// ASSGN SYSIPT.. 

// ASSGN SYSLST,. 

// ASSGN SYS001, . 
// ASSGN SYS002,, 
// ASSGN SYS003, . 

// ASSGN SYSLNK,. 

// OPTION LINK,. . 

// EXEC ASSEMBLY 


// JOB... 

// ASSGN SYSIPT'., 

// ASSGN SYSLST,, 

// ASSGN SYS001, , 
// ASSGN SYS002,, 
// ASSGN SYS003,, 

// ASSGN SYSLNK,. 

// OPTION LINK,.. 

// EXEC ASSEMBLY 


Source Deck 

/* 


Source deck 

/* 


Source deck 

/* 


Source deck 

/* 


INCLUDE SUBR1 


INCLUDE SUBR2 


INCLUDE 


Object deck (s) 


ENTRY .... 


// EXEC LNKEDT 


ENTRY .... 


// EXEC LNKEDT 


ENTRY 


// EXEC LNKEDT 


INCLUDE SUBR1 


INCLUDE 


Object deck (s) 


INCLUDE SUBR2 

INCLUDE SUBRT 
ENTRY_ 

// EXEC LNKEDT 


Any job control cards needed for the programs to be executed. 


// EXEC 


I// EXEC 


I// EXEC 


I// EXEC 


Data, if any 
/* 


JData, if any 

I/* 


|Data, if any 

I/* 


|Data, if any 

I/* 


If SYSRDR and SYSIPT are different units, a/6 card must placed after the last EXEC card 
in SYSRDR, and should be placed after the last /* in SYSIPT. 


Figure 28. Card Input for Different Variations of Assembly, Linkage Editing and 
Execution 
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Appendix L. Replacing the Current Assembler 


The EXEC ASSEMBLY statement causes the job 
control program to look for a phase with 
the name ASSEMBLY in the Core Image Library 
and load it into main storage. Since 
duplicate names cannot appear in a library, 
and every version of the assembler 
processor has the same phase name, only one 
of them can be in the Core Image Library at 
a time. Therefore the variant best suited 
for the particular installation is normally 
included in the Core Image Library. The 
programmer can, however, select another 
variant from the Relocatable Library and 
include it in the Core Image Library 
instead of the variant that is already 
there. 

Figure 29 shows the job control cards 
required to bring a particular assembler 
variant from the Relocatable Library into 
the Core Image Library, and Figure 30 shows 
the valid assembler names (the names under 
which the variants would be cataloged in 
the Relocatable Library). After the 
variant has been included in the Core Image 
Library, it can be loaded and executed 
through the EXEC ASSEMBLY statement. 


J// JOB CONDENSE 
)// EXEC MAINT 
j DELETC ASSE.ALL 
| CONDS CL 

I/S 

|// JOB LINKASM 
j// OPTION CATAL 
| INCLUDE name 4 
|// EXEC LNKEDT 
I/S 

I-- 


This job not 
needed in TOS 


'name' selected from those listed in 
Figure 30. 


Figure 29. Card Input for Selecting 

Different Assembler Variants 


Variants 1JQT16, 1JQD16TW, and IJQD16DW 
must be used if the assembler is to be run 
in less than 14K of available core. 
Variants IJQT32 and IJQD32 may be used if 
available core is never less than 14K. 

The IJQ variants are D assemblers. 

Variant IJYASM (the DOS F assembler) may 
be used if available core is never less 
than 45,056 bytes. 

IJQT32 andIJQD32 are generally faster 
than LJQT16 and IJQD16DW or IJQD16TW, 
respectively, because they have test i/o 
buffering and can use the additional core 


to build larger symbol tables. The 
difference in speed varies with the amount 
of additional core and the number of 
symbols in the assembly. 

Thus, if the assembly has few symbols 
or if only a small amount of additional 
core is available to a larger variant, the 
larger and smaller variants will be nearly 
equal in speed. 

For comparable assemblies i DOS 
assembler F (IJYASM) is up to 45X faster 
than DOS assembler D. 

Note 1 : The descriptions 16K and 32K 
refer to the machine size required to run 
the 10K and 14K variants respectively 
(except that the 14K variant can run on a 
IBM System/360 Operating System Model 30 
with 24K of core) . 

Note 2 : Some installations have two or 
more assemblers in the Core Image Library. 
In such instances, the phase names have 
been changed to avoid duplicate names in 
the library. (Refer to IBM System/360 
Disk Operating System: System Generation 
and Maintenance , and IBM System/360 Tape 
Operating System: System Generation and 
Maintenance .) 


r- T - T - T - 

|Name |System)Work Files 1 |Minimum Core 2 j 


h 


1JQD16DW|DOS j Disk j10,240 

I I I 

IJQD16TWJ DOS j Tape j 10,240 

I I I 

fIJQD32 j DOS |Mixed j14,336 

I I I 

IJYASM |DOS {Mixed {45,056 

I--4- 4 -4-^ 


IJQT16 |TOS {Tape 

I I 

IJQT32 j TOS {Tape 


J10,240 

I 

{14,336 


j.-x-r-x-^ 

1 Mixed work files mean any combination 
of 2400-series tapes and/or 2311 and/or 
2314 disk extents for SYS001, SYS002, 
and SYS003. In general, the assembler 
uses SYS001 and SYS002 as serial files 
and SYS003 as a random access file. 

2 Minimum core refers to the minimum 
number of contiguous bytes necessary 
for the particular assembler variant to 
function correctly. 


Figure 30. Assembler Variants 
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Appendix M. Object Deck Output 

) 


Figure 31 lists the card groups that make 
up the output deck produced by the 
assembler. The groups are listed in the 
order in which they appear in the output 
deck. 


Note : No output deck 

NODECK appears in the 


will be produced when 
OPTION card. 


The formats of the ESD, TXT, RLD, END, 
and SYM cards are shown in Figures 32 and 
33. 


(Card Group 

h 


Remarks 


Reproduced Cards 

Symbol Table (SYM) 

External Symbol Dictionary (ESD) 
Problem Program 

Relocation Dictionary (RLD) 

END Card 


These reproduced cards result from REPRO or PUNCH 
instructions located before START. 

Produced when SYM appears in the OPTION card. 


Consists of text (TXT) and reproduced cards, 
reproduced cards result from REPRO or PUNCH 
instructions located after START. 

Produced if relocatable constants are present. 

Produced as the last card of the output deck. 


The 


Object Deck Identification 


The 4-character assembly identification label punched into the name entry of the first 
TITLE card in the source program is punched into columns 73-76 of each record in the 
object deck. If there is no label, these columns are left blank. 


Object Deck Sequencing Numbering 


An assembler-generated sequence number is punched into columns 77-80 of each card in 
the object deck. 


Figure 31. Assembler Output Deck 
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The information in each card is in Extended Binary Coded Decimal Interchange Code. 


r-T- 

ColumnsJPunched 

I--x- 

ESD Card 

j.- 


H f- 


2-4 


11-12 


15-16 


17-72 


73-76 


Multiple punch (12-2-9). 
Identifies this as a loader card. 

ESD—External Symbol Dictionary 
card. 

Number of bytes of information 
contained in this card. 

External symbol identification 
number (ESID) of the first SD, 

PC, WX, or ER on this card. 
Relates the SD, PC, WX, or ER to 
a particular control section. 

Variable information. 

•8 positions. Name. 

•1 position. Type code to 
indicate SD, WX, PC, LD, or 
ER. 

•3 positions. Assembled 
origin. 

•1 position. Blank. 

•3 positions. Control section 
length, if an SD-type or a 
PC-type. If an LD-type, this 
field contains the external 
symbol identification number 
(ESID) of the SD or PC 
containing the label. 

Program identification taken form 
the name field of the first TITLE 
statement. 


77-80 (Sequence number. 


TXT Card 


Multiple punch (12-2-9) . 
Identifies this as a loader card. 
2-4 j TXT—Text card. 

6-8 I Assembled origin (address of 

first byte to be loaded from this 
card) . 

11-12 j Number of bytes of text to be 
loaded. 

15-16 1 External symbol identification 

number (ESID) of the control 
section (SD) containing the text. 
17-72 jUp to 56 bytes of text—data or 
instructions to be loaded. 


r- t- 

|Columns|Punched 


73-76 {Program identification taken from 
jthe name field of the first TITLE 
statement. 


H 


77-80 {Sequence number. 


RLD Card 


1 

2-4 

11-12 

17-72 


73-76 


Multiple punch (12-2-9). 

RLD—Relocation Dictionary card. 

Number of bytes of information 
contained in the card. 

Variable information (multiple 
items) . 

•2 positions. Pointer to the 
relocation factor of the 
contents of the load constant. 

•2 positions. Pointer to the 
relocation factor of the 
control sections in which the 
load constants occurs. 

•1 position. Flag indicating 
type of constant. 

•3 positions. Assembled 
address of load constant. 

Program identification taken form 
the name field of the first TITLE 
statement. 


77-80 jSequence number 


END Card 


1 jMultiple punch (12-2-9) . 

2-4 {END 

6-8 {Assembled origin of the label 

jsupplied to the Assembler in the 
{END card (optional) . 

15-16 jESID number of the control 

jsection to which this END card 
|refers. 

17-22 |Symbolic label supplied to the 

{Assembler if this iabel was not 
jdefined within the assembly. 

73-76 {Program identification taken from 
jthe name field of the first TITLE 
j statement. 

77-80 {Sequence number. 


Figure 32. Format of ESD, TXT, RLD, and END Cards 
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| Columns j Contents 


1 j12-2-9 punch 
2-4 |SYM 

5-10 jBlank 

11-12 |Number of bytes in the Variable Field 

13-14 |Blank 
15-16 j ESID 

17-72 |The Variable Field (see below) 

73-76 |Deck ID (from the first TITLE card) or blank 
77-80 jcard sequence number 


The variable field (columns 17-72) contains up to 56 bytes of AUTOTEST text. The items 
making up the text are packed together; consequently the last card may contain less 
than 56 bytes of text in the variable field. The contents of the fields within an 
individual text item are, as follows: 

1.Organization (1 byte) : 

Bit 0: 0 

Bit 1: 1 

Bit 2: 1 

Bit 3: 1 

1 = DC or DS 

Bit 4 : 

0 = not DC or DS 

Bits 5-7: Length of name minus one. 

2. Address (3 bytes) : displacement from base of control section. 

3. Symbol Name (1-8 bytes): symbolic name of the particular item. 

The following fields are present only for data-type items: 

4. Data Type (1 byte): 


X' 04 1 
X' 08' 
X' 10' 
X* 14' 
X' 18' 
X' 1C 
x'20* 

X' 24* 
X* 28' 
X'2C' 
X* 30' 
X* 34' 


X'OO character 
hexadecimal 
binary 

full word, fixed point 

half word, fixed point 

single precision floating point 

double precision floating point 

A-type or Q-type address constant 

Y-type address constant 

S-type address constant 

V-type address constant 

packed decimal 

zoned decimal 

Length (1-2 bytes): length of data item minus one. Occupies two bytes for 
character, hexadecimal and binary items; otherwise one. 


Multiplicity (1 byte) 


always X*01' 
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1 


New text can be substituted for 
assembled text using the REP card. Each 
REP card must contain the assembled address 
of the first byte to be replaced and the 
identification of the control section to 
which it refers, and may contain from two 
to 22 bytes of text. The text is 
substituted, byte for byte, for the 
original text, beginning at the address 
specified. The address, the control 
section reference, and the new text must be 
stated in hexadecimal. The REP card must 
be placed after the TXT cards in the object 
module that it modifies. Its format is 
shown in Figure 34. 


Figure 34. Format of the REF card. 


Columns 

T -- ------- 

J Contents 

4 . . . . 

1 

T 

(Multiple punch (12-2-9) . 
(Identifies this as a loader card. 

I 

2-4 

|REP—Replace text card. 

J 

5-6 

! 

J Blank. 

7-12 

I 

(Assembled address of the first 
(byte to be replaced 
j (hexadecimal) . Must be right 
(justified with leading zeros if 

jneeded to fill the field. 

1 

13 

1 

j B1ank. 

1 

14-16 

1 

(External symbol identification 
jnumber (ESID) of the control 
(section (SD) containing the text 
j (hexadecimal) . Must be right 
(justified with leading zeros if 
(needed to fill the field. 

I 

17-70 

1 

(From one to eleven 4-digit 
(hexadecimal fields separated by 
jcommas, each replacing two bytes. 
(A blank indicates the end of 

(information in this card. 

1 

71-72 

i 

J Blank. 

1 

73-80 

1 

(May be used for program 
jidentification. 
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Appendix N. Diagnostic Error Messages 


Diagnostic error messages are printed 
following the cross-reference listing, in 
statement number order. The message code 
has the form IJQnnn for the D assembler and 
IJYnnn for the F assembler. Figure 35 


lists the diagnostic messages and their 
message codes. If errors are encountered 
while editing library macros, the statement 
number referenced will be that of the "END" 
statement. 


Message 

Code 

IJQ 

001 

IJY 


IJQ 

002 

IJY 


IJQ 

003 

I3Y 


IJQ 

004 

IJY 


IJQ 

005 

IJY 


IJQ 

006 

IJY 


IJQ 

007 

IJY 


IJQ 

008 

IJY 


IJQ 

009 

IJY 


IJQ 

010 

IJY 



Message 

DUPLICATION FACTOR ERROR 


RELOCATABLE DUPLICATION FACTOR 

LENGTH ERROR 

RELOCATABLE LENGTH 

S-TYPE CONSTANT IN LITERAL 

INVALID ORIGIN 

LOCATION COUNTER ERROR 

INVALID DISPLACEMENT 

MISSING OPERAND 


INVALID SPECIFICATION OF REGISTER 
OR MASK FIELD 


Meaning 


Duplication factor: 

1. Is zero in a literal. 

2. Is not a positive absolute expression. 


Duplication factor is relocatable. 

1. Out of permissable range. 

2. Invalid specification. 

Length is relocatable. 

S-type constant in literal. 


Location counter has been reset to a value 
less than the starting address of the control 
section. 

Location counter has exceeded 2 2 **-1. 


Displacement in an explicit address is not 
within 0-4095. 

Operand is missing. 


1. The register or mask field specification 

not an absolute value. 

2. The register or mask field specified not 

in the range 0 - 15. 

3. An odd register specified where an even 
register is required (multiply, divide, 
and shift instructions). 

4. The register specified is not a floating 
point register (floating point 
instructions) . 

5. The register specified is not an 
extended precision floating point 
register (extended precision floating 
point instructions) . 

6. The immediate field specified for an SRP 
instruction not in the range 0 - 9. 


Figure 35. Assembler Diagnostic Error Messages (Part 1 of 14) 


Appendix N: Diagnostic Error Messages 187 








Message 

Code 


IJQ Oil 
IJY 


IJQ 012 
IJY 

IJQ 013 
IJY 

IJQ 014 
IJY 

IJQ 015 
IJY 


IJQ 016 
IJY 


IJQ 017 
IJY 


IJQ 018 
IJY 


IJQ 019 
IJY 


IJQ 020 
IJY 


IJQ 021 
IJY 

IJQ 022 
IJY 


IJQ 023 
IJY 

IJQ 024 
IJY 

IJQ 025 
IJY 


Message 


SCALE MODIFIER ERROR 


RELOCATABLE SCALE MODIFIER 


EXPONENT MODIFIER ERROR 


RELOCATABLE EXPONENT MODIFIER 


INVALID LITERAL USAGE 


INVALID NAME 


DATA ITEM TOO LARGE 


INVALID SYMBOL 


EXTERNAL SYMBOL ERROR 


INVALID IMMEDIATE FIELD 


SYMBOL NOT PREVIOUSLY DEFINED 


ESD TABLE OVERFLOW 


PREVIOUSLY DEFINED NAME 


UNDEFINED SYMBOL 


RELOCATABILITY ERROR 


Meaning 


Scale modifier is: 

1. Too large, 

2. Not an absolute expression. 

Scale modifier is not allowed to be 
relocatable. 

Exponent is: 

1. Out of range. 

2. Not specified as an absolute expression. 
Exponent modifier is not allowed to be 
relocatable. 

A valid literal is used illegally, 
e.g., specifies a receiving field or a 
register. 

Name entry incorrectly specified— 

1. Contains more than 8 characters. 

2. Does not begin with a letter. 

3. Has a special character imbedded. 

The constant is too large for: 

1. The data type. 

2. The explicit length. 

The symbol specification is invalid, 
e.g., longer than 8 characters, embedded 
special character. 

1. Identical name entry in a CSECT 
and a DSECT statement. 

2. Identical operands in one or more 
EXTRN/WXTRN statements. 

1. The immediate field is not an absolute 
expression. 

2. The value of the immediate field 
is not in the range 0-255. 

A statement requiring predefined symbols 
contains a symbol not predefined. 

The total number of control sections, dummy 
sections, and unique symbols in EXTRN 
statements and V-type constants exceeds 255. 

The symbol in the name entry has appeared 
in the name entry of a previous statement. 

A symbol being referenced has not been 
defined in the program. 

A relocatable or complex relocatable 
expression is specified where an absolute 
expression is required. 
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r -—T 

|Message| 
j Code f 

L ' 

1 IJQ 

026 | 

11JY 


|IJQ 

027 J 

11 JY 


1 IJQ 

028 | 

11 JY 


1 IJQ 

029 | 

11 JY 


| IJQ 

030 J 

j I JY 


1 IJQ 

0311 

j I JY 


1UQ 

032 | 

j I JY 


| IJQ 

033 | 

j I JY 


1 IJQ 

0341 

j I JY 


| IJQ 

0351 

j IJY 


1 IJQ 

036 | 

j I JY 


1 IJQ 

037 | 

j I JY 


! 

_ ± 


Message 


TOO MANY LEVELS OF 
PARENTHESES 

TOO MANY TERMS 


REGISTER NOT USED 


+“ 


CCW ElRROR 


invalid cnop 


UNKNOWN TYPE 


OP-CODE NOT ALLOWED TO 
BE GENERATED 


ALIGNMENT ERROR 


INVALID OP-CODE 


ADDRESSABILITY ERROR 


OPERAND FIELD 


MNOTE STATEMENT 


Meaning 


Expression specifies more than 5 levels 
of parentheses. 

More than 16 terms specified in an 
expression. 

A register specified in a DROP statement 
is not currently in use. 

Bits 37-39 of the Channel Command Word are 
set to nonzero. 

Invalid range. 


Incorrect type designation in a DC, 

DS, or literal. 

Operation code allowed only in source 
statement has been obtained through 
substitution of a value for a variable 
symbol. 

Referenced address is not aligned to the 
proper boundary for this instruction. 


Note : Under System/370 this message applies 


only when the flagged statement is privileged 
instruction, a branch instruction, or an END 
instruction. 

Invalid operation code: 

1. More than eight characters. 

2. Operation entry not followed by a blank 
on same card. 

The referenced address is not within the 
range of a USING instruction. 

Operand found for an operation code which 
does not allow operands. (This message may 
be produced by the assembler if an operand is 
present in a COM, EJECT, or LTORG statement 
when the operation field has been created by 
variable symbol substitution. Operands in 
these statements are not used but are not in 
error.) 

An MNOTE statement has been generated from a 
macro definition. The text and severity code 
of the MNOTE statement is inline in the 
listing. 
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r-T 

Message 

Code 


Message 


Meaning 

+---1 \ j 


IJQ 038 
IJY 


ENTRY ERROR 


IJQ 039 
IJY 


invalid delimiter 


IJQ 

040 | 

GENERATED RECORD 

IJY 


TOO LONG 

IJQ 

0411 

UNDECLARED VARIABLE 

IJY 


SYMBOL 

IJQ 

042 | 

SINGLE TERM LOGICAL 

IJY 


EXPRESSION IS NOT A 



SETB SYMBOL 

IJQ 

043 | 

SET SYMBOL PREVIOUSLY 

IJY 


DEFINED 

IJQ 

044 | 

SET SYMBOL USAGE 

IJY 


INCONSISTENT WITH 



DECLARATION 

IJQ 

045 | 

ILLEGAL SYMBOLIC 

IJY 


PARAMETER 

IJQ 

0 46 | 

AT LEAST 1 RELOCATABLE 

IJY 


Y-TYPE CONSTANT IN 



ASSEMBLY 

IJQ 

047 | 

SEQUENCE SYMBOL 

IJY 

-X 

PREVIOUSLY DEFINED 


1. More than 100 ENTRY operands in this 
program. 

2. A symbol in the ENTRY operand: 

a. Appears in more than one ENTRY 
statement. 

b. Is defined in a dummy section. 

c. Is defined in blank common. 

d. Is equated to a symbol defined by an 
EXTRN or WXTRN statement. 

e. Is equated to a value less than 
start of CSECT. 


Any syntax error. 

1. A symbol has other than alphameric 
characters. 

2. A symbol begins with other than alpha 
characters. 

3. Excessive right parenthesis. 

4. Equal sign encountered in a sublist. 

5. Any terminating character encountered in 
an unexpected place. 

6. Mispunched op code causes unexpected 
syntax scan. 

7. A missing delimiter. 

8. A special character that is not a valid 
delimiter but is used as a delimiter. 

9. A delimiter used illegally. 

10. A missing operand: nothing appearing 
between delimiters. 

11. Unpaired parenthesis. 

12. An embedded blank- 

Record has more than 187 characters. 


Variable symbol is not declared in 
a define SET symbol statement or in a macro 
prototype. 

Single term logical expression is 
only valid for a SETB symbol. 


SET symbol previously defined. 


A SET symbol has been’declared as: 

1. Undimensioned but it is subscripted. 

2. Subscripted but it is undimensioned. 

Attribute requested for a variable symbol 
which is not a symbolic parameter. 

One or more relocatable Y-type constants in 
assembly; relocation may result in 
address greater than 2 bytes in length. 

Sequence symbol previously defined. 
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Message 

Code 


h- 

| IJQ 

O 1 
-C I 
00 1 
— *-■ 

jlJY 

j 

1 

1 IJQ 

1 

1 

049 | 

11JY 

1 

j IJQ 

© 

oi 

o 

| IJY 

j 

1 

1 

| IJQ 

1 

1 

0511 

| IJY 

1 

1 

1 

1 

1 

1 IJQ 

1 

1 

1 

1 

1 

0521 

| IJY 

1 

1 IJQ 

0531 

| IJY 

1 

1 

1 IJQ 

1 

054 | 

| IJY 

1 

1 

1 IJQ 

1 

056 | 

j IJY 

1 

1 

| IJQ 

1 

057 | 

j IJY 

j 

1 

1 

1 IJQ 

1 

1 

059 | 

j IJY 
l_ 

-JL 


Message 


SYMBOLIC PARAMETER 
PREVIOUSLY DEFINED OR 
SYMBOL DECLARED AS 
SYSTEM VARIABLE 
SYMBOLIC PARAMETER 


VARIABLE SYMBOL MATCHES 
A PARAMETER 

INCONSISTENT GLOBAL 
DECLARATIONS 


PROGRAMMER MACRO DEFINITION 
PREVIOUSLY DEFINED 


NAME FIELD CONTAINS 
ILLEGAL SET SYMBOL 

GLOBAL DICTIONARY FULL 


LOCAL DICTIONARY FULL 


ARITHMETIC OVERFLOW 


SUBSCRIPT EXCEEDS 
MAXIMUM DIMENSION 


UNDEFINED SEQUENCE 
SYMBOL 


Meaning 


Symbolic parameter previously defined. 
System variable symbol declared as a 
symbolic parameter. 


Variable symbol matches a parameter. 


A global SET variable that is defined in more 
than one macro definition, or in a macro 
definition and in the source program, is 
inconsistent in SET type or dimension. 

Programmer macro prototype operation entry 
is identical to a: 

1. Machine instruction. 

2. Assembler instruction. 

3. Previous programmer macro prototype. 

This message is not produced when a 
programmer macro matches a system macro. The 
programmer macro will be assembled with no 
indication of the corresponding system macro. 

SET symbol in name entry does not correspond 
to SET statement type. 

Global dictionary is full. Assembly 
is terminated. See Appendix H for dictionary 
size limits. 

Local dictionary is full. Assembly 
is terminated. See Appendix H for dictionary 
size limits. 

Intermediate or final result of an 
arithmetic operation is less than -2 31 or 
greater than 2 31 -1. 

1. SSYSLST or symbolic parameter subscript: 

a. Exceeds 100 (200 for F assembler) . 

b. Is negative. 

2. Symbolic parameter subscript is zero. 

3. SET symbol subscript exceeds dimension. 

Operand sequence symbol does not appear as a 
sequence symbol in a name field. 
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r- t 

Message 

Code 


IJQ 

IJY 

060 

IJQ 

IJY 

061 

IJQ 

IJY 

062 

IJQ 

IJY 

063 

IJQ 

IJY 

064 

IJQ 

IJY 

065 


Message 


ILLEGAL ATTRIBUTE 
NOTATION 


ACTR COUNTER EXCEEDED 


GENERATED STRING GREATER 
THAN 127 [255] CHARACTERS 


EXPRESSION 1 OF SUBSTRING 
IS ZERO OR MINUS 

EXPRESSION 2 OF SUBSTRING 
IS ZERO OR MINUS 

INVALID OR ILLEGAL TERM 
IN ARITHMETIC 
EXPRESSION 


Meaning 


L', S*, or I* requested for a parameter 
whose type attribute does not allow these 
attributes to be requested. 


Conditional assembly loop counter 
exceeded—conditional assembly terminated. 

Generated string is greater than 127 
characters for D assembler or 255 characters 
for F assembler. 

Expression 1 of substring is not allowed 
to be zero or minus. 

Expression 2 of substring is not allowed 
to be zero or minus. 

1. The parameter is not a self-defining 
term. 

2. The value of the SETC symbol used in 
the arithmetic expression is not 
composed of decimal digits. 


IJQ 

IJY 

066(UNDEFINED OR DUPLICATE 
|KEYWORD OPERAND 

1 

i 

1 

(1. A keyword operand occurs more than 
( once in a macro instruction. 

J 2. Keyword is not defined in prototype. 

1 

i 

1 

i 


IJQ 

IJY 

1 

068(GENERATION TIME DICTIONARY 
(AREA OVERFLOWED 

1 

(See Appendix H for dictionary size limits. 

i 

1 

I 

1 

1 

1 

' \ 

IJQ 

IJY 

069(EXPRESSION 2 OF SUBSTRING 
(GREATER THAN 8 CHARACTERS 

1 

(Expression 2 of substring is not 
j allowed to be greater than 8. 

f 

1 

1 

1 

j? 

IJQ 

IJY 

I 

070(FLOATING POINT CHARACTERISTIC 

(OUT OF RANGE 

1 

■ 

I 

(Exponent too large for length of 

(defining field; exponent modifier has caused 

(loss of all significant digits. 

1 

1 

1 

1 

1 

i 


IJQ 

IJY 

071|ILLEGAL OCCURRENCE OF 

(LCL, GBL, or ACTR STATEMENT 

i 

1 

(Local or Global declaration, or ACTR 
(Statement is out of proper sequence. 

1 

! 

1 


IJQ 

IJY 

1 

072jILLEGAL RANGE ON ISEQ 
j STATEMENT 

I 

(Operand of ISEQ statement has 
jan illegal range. 

1 

1 

1 



\ r y 
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r — — t 
| Message} 
| Code j 

L i 

iug 

073 j 

jlJY 


1 IJQ 

074 | 

jlJY 


| IJQ 

0751 

j IJY 


1 IJQ 

076 | 

| IJY 


1 IJQ 

077 | 

j IJY 


1 IJQ 

o 

-4 

00 

| IJY 

1 

1 IJQ 

1 

079 | 

j IJY 

1 

| IJQ 

o 

00 

o 

j IJY 

1 

1 

| IJQ 

00 

o 

j IJY 

1 

| IJQ 

<N 

00 

© 

1 IJQ 

1 

1 

083 | 

j IJY 

1 

1 

1 IJQ 

o 

00 

■p 

| IJY 

1 

1 

[ _ 

1 

-i 


Message 

ILLEGAL NAME FIELD 


ILLEGAL STATEMENT IN 
COPYCODE OR SYSTEM MACRO 


ILLEGAL STATEMENT 
OUTSIDE OF A MACRO 
DEFINITION 


SEQUENCE ERROR 


ILLEGAL CONTINUATION 
CARD 


MACRO MNEMONIC OP-CODE 
TABLE OVERFLOW 

ILLEGAL STATEMENT IN 
MACRO DEFINITION 

ILLEGAL START CARD 


ILLEGAL FORMAT IN GBL 


ILLEGAL DIMENSION 
SPECIFICATION IN GBL OR 


SET STATEMENT NAME 


ILLEGAL OPERAND FIELD 


Meaning 

1 


Name entry required to be blank is not 
blank. 

2. Required name entry is missing. 

3. Name entry required to be a sequence 
symbol is not a sequence symbol. 


1. Statement encountered in COPY code is 
not legal in COPY code. 

2. Statement encountered in system macro is 
not legal in system macro. 

Statement allowed only in a macro 

definition encountered in OPEN code, 

e.g., period asterisk (.*) , mnote statement. 

Statement not in sequence specified 
by ISEQ instruction. 

1. Too many continuation cards. 

2. Nonblanks occur between the begin and 
continue columns of the continuation 
card. 

3. Card not intended as continuation was 
treated as such because of punch in 
continue column of preceding card. 

Macro mnemonic operation code table has an 
overflow. See Appendix H. 

This operation is not allowed within a 
macro definition. 

Statement affecting, or depending upon, 
the location counter have been encountered 
before a START statement. 

An operand is not a variable symbol. 

Dimension is not within the limits of 1-255. 


The name entry of a SET statement must 
be a variable symbol. 


Syntax invalid, e.g., AIF statement 
Operand does not start with a left 
parenthesis or, sequence symbol missing in 
operand field of AIF or AGO statement. 
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r- t 

Message 

Code 


Message 


Meaning 


IJQ 085 
IJY 


IJQ 086 
IJY 


INVALID SYNTAX IN 
EXPRESSION 


ILLEGAL USAGE OF SYSTEM 
VARIABLE SYMBOL 


IJQ 087 
IJY 

IJQ 088 
IJY 


NO ENDING APOSTROPHE 


UNDEFINED OPERATION 
CODE 


IJQ 089 
IJY 


IJQ 090 
IJY 


IJQ 091 
IJY 


IJQ 092 
IJY 


INVALID ATTRIBUTE 
NOTATION 


INVALID SUBSCRIPT 


INVALID SELF-DEFINING 
TERM 


INVALID FORMAT FOR 
VARIABLE SYMBOL 


IJQ 093 
IJY 


IJQ 094 
IJY 


unbalanced parentheses 
or excessive left 

PARENTHESES 


INVALID OR ILLEGAL 
NAME OR OPERATION IN 
PROTOTYPE STATEMENT 


1. Invalid delimiter. 

2. Too many terms in expression. 

3. Too many levels of parentheses. 

4. Two operators in succession. 


1. System variable symbol appears in: 

a. The name entry of a SET statement. 

b. A mixed-mode macro definition. 

c. A keyword macro definition. 

d. A GBL or LCL statement. 

2. &SYSLIST in context other than N' 
SYSLIST. 

End of card encountered before an 
ending apostrophe. 

1. Symbol in operation code field does not 
correspond to a valid machine or 
assembler operation code or to any 
operation code in a macro prototype 
statement. 

2. An inner macro is not defined. The 
opcode of the macro is not printed. 

The argument of the attribute reference 
must be a symbolic parameter and the 
statement must be within a macro definition. 

Syntax error, e.g., no right parenthesis 
after subscript; double subscript where 
single subscript is required, or single 
subscript where double subscript is required. 

1. Value is too large. 

2. Value is inconsistent with the data 
type, e.g., hex for decimal, etc. 

1. Variable symbol is no longer 
than 8 characters. 

2. First character after the ampersand is 
not alphabetic. 

3. Failure to use double ampersand in TITLE 
card or character self-defining term. 

End of statement or card encountered 
before all parenthesis levels are 
satisfied. May, be caused by embedded blank 
or other unexpected terminator, or failure to 
have a punch in continuation column. 

1. Name not blank or variable symbol. 

2. Variable symbol in name field is 
subscripted. 

3. Violation of rules for forming variable 
symbol, (must begin with ampersand (6) 
followed by 1-7 letters and/or numbers 
first of which must be a letter). 

4. Statement following 'MACRO* is not a 
valid prototype statement. 
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Message 

Code 


IJY 095 


IJQ 096 
IJY 


IJQ 097 
IJY 


Message 


ENTRY TABLE OVERFLOW 


MACRO INSTRUCTION OR 
PROTOTYPE OPERAND 
EXCEEDS 127 [225] 
CHARACTERS IN LENGTH 

INVALID FORMAT IN MACRO 
INSTRUCTION OPERAND OR 
PROTOTYPE PARAMETER 


Meaning 


Number of ENTRY symbols, i.e .,ENTRY 
instruction operands, exceeds 100. 

Macro instruction or prototype 
operand length exceeds 127 
characters for D assembler and 
255 characters for F assembler. 

1. Illegal equal sign (=) . 

2. A single ampersand (S) appears 
somewhere in the standard 

value assigned to a prototype keyword 
parameter. 

3. First character of a prototype parameter 
is not an ampersand. 

4. Prototype parameter is a subscripted 
variable symbol. 

5. Invalid usage of alternate format in 
prototype (see example). 

6. Invalid prototype parameter, e.g., SA* 
or SA& &. 


Note : Occurrence of this error will cause 

only syntax to be checked for the remainder 
of the macro definition. 


Example: 

r- T - T - T -1 

| ] ||Continuation| 

|Name j Operation j Operand|Column j 

j.-1-1-j-^ 

j jPROTO j SA,SB, j j 

II I or | ! 

| |PROTO |SA,SB, j X j 

II I SC | | 

L- X - X --- X -J 


IJQ 098 
IJY 


IJQ 099 
IJY 


IJQ 100 
IJY 

IJQ 101 
IJY 


EXCESSIVE OF 
OPERANDS OR PARAMETERS 


POSITIONAL MACRO 
INSTRUCTION OPERAND 
PROTOTYPE PARAMETER 
OR EXTRA COMMA FOLLOWS 
KEYWORD 

STATEMENT COMPLEXITY 
EXCEEDED 

EOD on SYSIN or SYSIPT 


1. The prototype has more than 100 
(200 for F assembler) parameters. 

2. The macro instruction has more than 100 
(200 for F assembler) operands. 

Positional macro instruction operand 
prototype parameter or extra 
comma follows keyword. 


See Appendix H for statement complexity 
limits. 

End of data reached before an END 
statement was encountered. 
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r—*- t 

Message 

Code 

h 


Message 


Meaning 


IJQ 102 
IJY 


IJQ 103 
IJY 


IJQ 104 
IJY 


IJQ 105 
IJY 


INVALID OR ILLEGAL ICTL 


ILLEGAL NAME IN 
OPERAND FIELD OF COPY 
CARD 

COPY CODE NOT FOUND 


EOD ON SOURCE STATEMENT 
LIBRARY 


IJY 106 


IJQ 107 
IJY 

IJQ 108 
IJY 

IJQ 109 
IJY 


IJY 1 10 


NOT NAME OF DSECT 

INVALID OPERAND 

PREMATURE EOD 

PRECISION LOST 


EXPRESSION VALUE 
TOO LARGE 


1. Operands of ICTL statements are 
out of range. 

2. ICTL is not the first statement in the 
input deck. 


Syntax error, e.g., symbol has an 
illegal character or has more than 
8 characters. 

The operand of a COPY statement 
specified COPY text which cannot be 
found in the library. 

1. Mend statement missing from macro 
definition. 

2. While editing a macro, COPY code not 
found. Macro definition truncated. 

3. End of file encountered while reading a 
macro or copy code. 

4. The statement immediately preceding 
BKEND in a copy book has a nonblank 
character in its continuation column. 

Referenced symbol expected to be DSECT name, 
but it is not. 

Operand unrecognizable, contains invalid 
value, or incorrectly specified. 

Indicates a machine error or an internal 
assembler error. 

High order information lost by attempting 
to express constant in a field not long 
enough to contain it. 

Value of expression greater than 
-16777216 to +16777215. 

Expressions in EQU and ORG statements are 
flagged if (1) they include terms previously 
defined as negative values, or (2) positive 
terms give a result of more than three bytes 
in magnitude. The error indication may be 
erroneous due to (1) the treatment of 
negative values as three-byte positive 
values, or (2) the effect of large positive 
values on the location counter if a control 
section begins with a START statement having 
an operand greater than zero, or a control 
section is divided into subsections. 
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Messages ending with an I are printed on both SYSLST and SYSLOG unless one of the 
messages indicates that SYSLST or an unidentifiable unit is defective, in which case 
they will appear on SYSLOG only. The messages appearing on SYSLOG will be prefaced by 
B A“ regardless of which assembler produced them. 1101 and 1111 errors can be detected 
at any point during assembly — amount of assembly listing printed is unpredictable. 
1121 through 1151 errors are detected immediately upon assembly attempt — no assembly 
listing is printed. In either case the assembly is terminated, the source is bypassed 
to a /* or EOF, and control returned to the supervisor via EOJ. The subsequent steps 
of a multiple step JOB are not bypassed unless they are also defective. 



Message 

Code 

H 


Message 


Meaning 


IJQ 1101 


IJQ 1111 
IJY 


IJQ 1121 
IJY 


ABORT—PERM I/O ERROR 


ABORT—UNEXPECTED EOF 
ON SYSxxx 


ABORT—INADEQUATE 
CORE FOR 32L [44K] 
ASSEMBLER 


An unrecoverable error on the designated unit 
prevents further processing. If the file 
named is SYSxxx, the unit code of the DTF 
which caused the error does not match any 
unit valid in the assembler. 

The assembler does not support multivolume 
work files. Determine the cause of EOF 
(usually short tape) and rerun with adequate 
storage for work files. 


Cause: An attempt was made to execute the 


[32K] D assembler in less than 14K, or the F 
assembler in less than 44K. 

This is probably a user error. 

System Action ; The job step is terminated. 


Programmer Action ; If there is insufficient 


main storage available, you must linkage edit 
a smaller assembler. 

If the problem recurs, do the following to 
complete your problem determination action: 

1. Execute the MAP command and retain the 
output. 

2. Have the printer output available. 

Operator Action : Execute the MAP command to 
determine the partition size. Then allocate 
a larger partition for the assembly. 


Figure 35. 
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r- t 

Message 

Code 

131 


Message 


Meaning 


ABORT—INVALID 
PHYSICAL UNIT FOR 
SYSxxx 


Cause : The assignments for a work file(s) 


are not valid. 

• The device type is not valid, or the 10K 
version of the D assembler is linkage 
edited for different devices than those 
assigned. 

• The UA (unassign) or IGN (ignore) option 
was specified for the D assembler. 

• The specified mode setting is not valid. 

• For the 10K version of the D assembler, 
the work file device types are not 
consistent. (SYS003 is correct.) 

Only the first invalid unit is named in the 
message. 

This is probably a user error. 

System Action : The job step is terminated. 


Programmer Action : Use the LISTIO output to 


determine the cause for the message. 

Correct the assignments and resubmit the job. 

If the problem recurs, do the following to 
complete your problem determination action: 

1. Have the LISTIO output available. 

2. Have the job stream and system output 
available. 

Operator Action : Issue the LISTIO command to 


check the assignments and enter the correct 
work file assignments if possible. 
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|Message | 

(Code (Message 

L 

(Meaning j 

4 1 

jlJQ 

1141jABORT—NO UNIT ASSIGNED FOR 
j SYSPCH (for D assembler) 

1 

i 

1 1 

(Cause : For the D assembler, the OPTION i 

j [DECK] is in effect and SYSPCH is not j 

(assigned. j 

i i 


I 

1 

I 

1 1 

(This is probably a user error. | 

I 1 


1 

1 

i 

i 1 

1 System Action: The iob step is terminated. 1 

i i 


1 

1 

1 

i 

I 1 
IProqrammer Action: Submit an assiqn for ! 
(SYSPCH, j 

3 1 


1 

1 

1 

1 1 

\9L 1 

j 1 


1 

1 

i 

1 1 

(specify OPTION [NODECK] and resubmit the job.( 

1 1 


1 

1 

1 

1 1 

(If the problem recurs, do the following to | 

(complete your problem determination action: j 

i < 


1 

1 

1 

1 

i 

1 1 

J 1. Retain the LISTIO listing. | 

j 2. Have the job stream, program listing, j 

j and system log available. | 

i j 


1 

1 

1 

1 

1 

1 1 

1 Operator Action: Execute the LISTIO command 1 

(and verify assignments. Submit an assign forj 

(SYSPCH and rerun the job. j 

1 | 

11JY 

1 

1141 (ABORT—NO UNIT 

(ASSIGNED FOR SYSxxx 
j (OPTION SYM) 

| (for F assembler) 

1 

1 

i 

(Cause: For the F assembler, a required unit I 
j (SYS001-SYS003 or a device required by | 

Jan OPTION statement) is unassigned, or the j 

(IGN option is specified for the device. The j 
j (ignore) option is valid for SYSPCH and j 

(SYSLST. | 

1 | 


1 

1 

I 

(This is probably a user error. j 

i i 


1 

1 

1 

1 

i 1 

(System Action: The system terminates the iofcl 

(step. j 

j j 


1 

1 

1 

1 

IProqrammer Action: Submit an assignment for | 
(the indicated logical unit, J 


I 

1 

f 

1 I 

1 or 1 

i i 


1 

1 

1 

l 

1 I 
(correct the OPTION statement to eliminate thej 
(requirement and resubmit the job. j 

i i 


1 

J 

1 

1 

1 

l 

( 1 
(If the problem recurs, have the LISTIO ( 

(listing, the system log, the job stream, and j 
(the printer output available to complete yourj 
(problem determination action. j 

i i 


1 

1 

1 

1 

1 

1 1 

(Operator Action: Execute the LISTIO command I 
(and verify the assignments. Submit an assignj 
(for the indicated logical unit and rerun the j 
(job. J 


Figure 35. Assembler Diagnostic Error Messages (Fart 13 of 14) 
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Message 

Code 


Message 


jMeaning 


IJY 1151 


ABORT—INVALID DUAL 
ASSGN SYSPCH- 
SYSIPT [SYSLST] 


IJQ 1161 


ABORT-INVALID MULTIPLE 
EXTENTS FOR WORKFILES 
(for the D assembler) 


Cause : SYSPCH and SYSIPT are both assigned 
to the same unit, which is not a 1442N1 or 
2520B1 card reader. 


SYSPCH and SYSLST are both assigned to the 
same unit, which is not a disk. 

This is probably a user error. 

System Action : The job step is terminated. 

Programmer Action : Check the LIST10 listing 
to determine the dual assignments. Reassign 
the indicated logical units to separate 
devices, or the required device type. 

If the problem recurs, retain the LISTIO 
output, the job stream, system log, and 
supervisor listing to complete your problem 
determination action. 

O perator Action : Execute LISTIO to determine 
the current assignments. Reassign the two 
indicated logical units to separate devices 
or to the required device type. 

Cause : For the D assembler, more than one 
extent is assigned for SYS001, SYS002, 
or SYS003. 

System Action : The job step is terminated. 

Programmer Action : Probable user error. 
Correct extent job control statement. If the 
problem persists do the following before 
calling for IBM programming support. 

• Execute the LSERV program and save its 
output. 

• Have the associated jobstream and program 
listing available. 

Operator Action: None. 


Figure 35. Assembler Diagnostic Error Messages (Part 14 of 14) 


Note : If the execution of the assembler is terminated abnormally with the message 4950A 

NO MORE AVAILABLE EXTENTS, on the console , one of the assembler work files has been 
filled. This is probably caused by a conditional assembly loop resulting from a logical 
error in the source code. To locate the error, ACTR statements should be included in 
each macro definition and in the main portion of the source code. The programmer must 
also make sure that a MACRO statement is included to identify the beginning of each 
macro definition. Otherwise the statements of the definition are included in the main 
portion of the program. 
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Appendix O. Self-Relocating Program Techniques 


Self-relocating programs are executed in a 
multiprogramming environment and at any 
location in main storage. These programs 
may be located in either foreground area of 
main storage. A program that is 
self-relocating must initialize its address 
constants, including channel command words 
(CCWs) at execution time. The user must 
code his own self-relocating routine for 
execution after it is linkage edited and 
loaded into main storage. 

When coding a self-relocating program, 
the programmer should take these points 
into consideration: 

1. All A-type address constants must be 
relocated. 

2. The I/O area addresses in all CCWs 
must be relocated. 

3. Address constants generated by 
physical IOCS macros (EXCP, WAIT, 
etc.) must be relocated. 

4. Logical IOCS macros can be 

self-relocated using the OPENR macro. 

The following example program shows how 
a user may code a self-relocating program. 
This example uses the A-type constant and 
registers 1 and 2 although the user may use 
any of the other available registers if he 
chooses. 


This program contains six address 
constants. Two are A-type and two each are 
contained in the command control block 
(CCB) and the channel command word (CCW) 
macros. This procedure is used: 


1. The absolute addresses of the contents 
of the two A-type constants (EOFTAPE 
and CHA12) and the CCW for each CCB 
(PRINTCCW and TAPECCW) are loaded into 
a work register (register 1). 

2. The work register is stored in the 
address constants [A (EOFTAPE) and 
A(CHA12)] and in their respective CCBs 
(PRINTCCB+8 and TAPECCB+8) . 

3. The command code for the CCWs shares a 

fullword with the I/O area address and 
must be reset after the I/O area 
address has been stored. This is done 
here by two methods: (a) saving the 

command code for the PRINTCCW in 
register 2 and then restoring it; (b) 
using the the Move Immediate (MVI) 
instruction for the TAPECCW to set the 
command code. 

In the main routine of this program, 
note that register notation has been used 
with the EXCP and WAIT macros to avoid the 
generation of address constants by the 
macros themselves. The example of a 
self-relocating program follows. 
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SOURCE STATEMENT 



PRINT 

NOGEN 


PROGRAM 

START 

0 



BALR 

15,0 



USING 

*,15 


* ROUTINE TO RELOCATE ADDRESS CONSTANTS 


LA 

1 , PRINTCCW 

RELOCATE CCW ADDRESS 


ST 

1,PRINTCCB+8 

IN CCB FOR PRINTER 


LA 

1,TAPECCW 

RELOCATE CCW ADDRESS 


ST 

1 ,TAPECCB+8 

IN CCB FOR INPUT TAPE 


LA 

1 , EOFTAPE 

♦RELOCATE***** 


ST 

1,AEOFTAPE 

* PROGRAM * 


LA 

1,CHA12 

* ADDRESS * 


ST 

1,ACHA12 

♦♦♦♦CONSTANTS* 


IC 

2,PRINTCCW 

SAVE PRINT CCW OP CODE 


LA 

1,OUTAREA 

RELOCATE OUTPUT AREA ADDRESS 


ST 

1-PRINTCCW 

IN PRINTER CCW 


STC 

2,PRINTCCW 

RESTORE PRINT CCW OP CODE 


LA 

1,INAREA 

RELOCATE INPUT AREA ADDRESS 


ST 

1,TAPECCW 

IN TAPE CCW 


MV I 

TAPECCW,2 

SET TAPE CCW CODE TO READ 

* MAIN ROUTINE...READ TAPE AND PRINT RECORDS 

READTAPE 

LA 

1,TAPECCB 

GET CCB ADDRESS 


EX CP 

(1) 

READ ONE RECORD FROM TAPE 


WAIT 

(1) 

WAIT FOR COMPL. OF I/O 


L 

10,AEOFTAPE 

GET ADDRESS OF TAPE EOF ROUTINE 


BAL 

14,CHECK 

GO TO UNIT EXCEPTION SUBROUTINE 


me 

OUTAREA(10) ,INAREA 

EDIT RECORD 


me 

OUTAREA+15(70),INAREA+10 

IN 


me 

OUTAREA*90(20),INAREA*80 

OUTPUT AREA 


LA 

1,PRINTCCB 

GET CCB ADDRESS 


EX CP 

(1) 

PRINT EDITED RECORD 


WAIT 

(1) 

WAIT FOR COMPL. OF I/O 


L 

10,ACHA12 

GET ADDRESS OF CHAN 12 ROUTINE 


BAL 

14,CHECK 

GO TO UNIT EXCEPTION SUBROUTINE 


B 

READTAPE 


CHECK 

TM 

4 (1) ,1 

CHECK FOR UNIT EXC. IN CCB 


BCR 

1,10 

YES-GO TO PROPER ROUTINE 


BR 

14 

NO-RETURN TO MAINLINE 

CHA12 

MVI 

PRINTCCW,X'8B* 

SET SK TO CHAN 1 OP CODE 


EX CP 

(D 

SK TO CHAN 1 IMMEDIATELY 


WAIT 

(1) 

WAIT FOR COMPL. OF I/O 


MVI 

PRINTCCW,9 

SET PRINTER OP CODE TO WRITE 


BR 

14 

RETURN TO MAINLINE 

EOFTAPE EOJ 


END OF JOB 


CNOP 

0/4 

ALIGN CCB'S TO FULL WORD 

PRINTCCB 

CCB 

SYS004,PRINTCCW,X*0400* 


TAPECCB 

CCB 

SYS001,TAPECCW 


PRINTCCW 

CCW 

9,OUTAREA,X'20 *,110 


TAPECCW 

CCW 

2,INAREA,X'20',100 


AEOFTAPE 

DC 

A (EOFTAPE) 


ACHA12 

DC 

A (CHA12) 


OUTAREA 

DC 

CL110* ' 


INAREA 

DC 

CL 100' • 



END 

PROGRAM 
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Appendix P. Sample Macro Definitions 


The macro definitions in this appendix are 
typical applications of the macro language 
and conditional assembly. Another macro 
definition is included as part of Appendix 
I. The definitions are presented along 
with statements generated from typical 
corresponding macro instructions. 


The second macro definition is MOVE. 
This macro is recursive; i.e ., it calls 
itself as an inner macro. Compare this 
macro definition with MOVE in Appendix I. 
MOVE in Appendix I has more statements, 
however it functions differently and 
includes error checking facilities. 


The first macro definition is NOTE — a 
DOS system macro taken from the source 
statement library of the DOS assembler. 

MACRO 

CLABEL NOTE €FILEN 

.* IBM SYSTEM/360 TAPE/DISK OPERATING SYSTEM 


* CHANGE 

LEVEL 

2-0 




A IF 

(T* CFILEN NE *0 

').ONE 



MNOTE 

0,* NO FILENAME 

SPECIFIED-SET 

TO 

CLABEL 

L 

l * = A ( * ) 

*****ERROR-PATCH DTF TABLE ADDRESS 


AGO 

.THREE 



.ONE 

A IF 

(•CFILEN*(1,1) 

NE *(*).TWO 



A IF 

(* CFILEN(1)' EQ 

• 1*).FOUR 


CLABEL 

LR 

1» £FILEN(1) 

GET 

DTF TABLE ADDRESS 


AGO 

.THREE 



.TWO 

ANOP 




CLABEL 

L 

1»«A(CFILEN) 

GET 

DTF TABLE ADDRESS 

.THREE 

L 

15,16(1) 

GET 

LOGIC MODULE ADDRESS 


AGO 

.FIVE 



.FOUR 

ANOP 




CLABEL 

L 

15,16(1) 

GET 

LOGIC MODULE ADDRESS 

.FIVE 

BAL 

14,12(15) 

BRANCH TO NOTE ROUTINE 


MEND 





STATEMENTS GENERATED FROM NOTE MACRO INSTRUCTIONS 




SYMBOL AS OPERAND 


NNAME NOTE 

♦ * CHANGE LEVEL 

♦NNAME L 

♦ L 

♦ BAL 


INFILE 

2-0 

1*=A(INFILE) GET DTF TABLE ADDRESS 
15*16(1) GET LOGIC MODULE ADDRESS 
14,12(15) BRANCH TO NOTE ROUTINE 




REGISTER 1 AS OPERAND 


NOTE 

♦* CHANGE LEVEL 

♦ L 

♦ BAL 


(1) 

2-0 

15,16(1) GET LOGIC MODULE ADDRESS 
14,12(15) BRANCH TO NOTE ROUTINE 




OTHER REGISTER AS OPERAND 


NOTE 

♦* CHANGE LEVEL 

♦ LR 

♦ L 

♦ BAL 


(5) 

2-0 

1,5 GET DTF TABLE ADDRESS 
15,16(1) GET LOGIC MODULE ADDRESS 
14,12(15) BRANCH TO NOTE ROUTINE 
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OMITTED OPERAND 




ft* CHANGE 

♦ 

ft 

♦ 


6NAME 

.* 

• * 

• * 

68 
• PN 
6NAME 
6A 
6B 


• DO 

6NAME 

6A 


* 


MNAME 

♦MNAME 


* 


♦ 




MNAME2 

♦MNAME2 

ft 


ft 

♦ 

ft 


NOTE 

LEVEL 2-0 

0»NO FILENAME SPECIFIEO.SET TO •** 

L 1,*A(*) ****»ERROR-PATCH DTF TABLE ADDRESS 
L 15 116(1) GET LOGIC MODULE ADDRESS 
BAL 14,12(15) BRANCH TO NOTE ROUTINE 



J 


MACRO 

MOVE 6FR0M,6TQ,6C0UNT 

RECURSIVE GENERAL PURPOSE MOVE MACRO 


GBLA 

6A 



LCLA 

6B 



SETA 

6C0UNT 



AIF 

(6B LE 256).DO 

MOVE LESS THAN 256 

BYTES 

MVC 

CTOftGA.(256),6FR0Mft£A 

256 BYTE MOVE 


SETA 

6Aft256 



SETA 

LB-256 



MOVE 

MEXIT 

ANOP 

6FR0M,6T0,€B 

CALL THYSELF 


MVC 

6T0+6A.(LB),6FR0Mft6A 

LESS THAN 256 BYTE 

MOVE 

SETA 

MEND 

0 

SET BACK TO 0 FOR 

NEXT CALL 


STATEMENTS GENERATED FROM MOVE MACRO INSTRUCTIONS 



MOVE LESS THAN 256 BYTES 
MOVE FRMAD,TOAD, 1*50 

MVC T0AD+0U50) tFRMAD+O LESS THAN 256 BYTE MOVE 


MOVE 256 BYTES 
MOVE FRMAD,TOAD,256 

MVC T0ADft0(256) ,FRMADftO LESS- THAN 256 BYTE MOVE 


MOVE MORE THAN 256 BYTES 
MOVE FRMAD,TOAD,400 

MVC T0ADft0(256),FRMADft0 256 BYTE MOVE 

MVC T0A0ft256(144),FRMAD+256 LESS THAN 256 BYTE MOVE 


MOVE MORE THAN 512 BYTES 
MOVE FRMAD,T0AD,520 

MVC TOADftOf256),FRMADftO 256 BYTE MOVE 

MVC TOAD+256(256),FRMADft256 256 BYTE MOVE 

MVC TOAD+512(8),FRMAD+512 LESS THAN 256 BYTE MOVE 


•f "'n 

! i j 
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Indexes to systems reference library manuals are consolidated in IBM System/360 Disk 
Operating System Master Index , GC24-5063 and in IBM System/360 Tape Operating System 
Programming Index , GC24-5064. For additional information about any subject listed 
below, refer to other publications listed for the same subject in the consolidated 
index. 


&SYS, restrictions on use 76,88,101 
&SYSECT (see Current control section name) 
&SYSLIST (see macro instruction operand) 
&SYSNDX (see macro instruction index) 
&SYSPARM (see system parameter for 
conditional assembly) 

7090/7094 Support Package Assembler 13,170 
Absolute terms 20 
ACTR instruction 97 
Address constants 56 
A-type 57 

Complex relocatable expressions 57 

Literals not allowed 25 

S-type 57 

V-type 58 

Y-type 57 

Address specification 42 
Addressing 31 

Dummy sections 36 
Explicit 31 

External control sections 39 
Implied 31 
Relative 34 
AGO instruction 96 
Example 96 
Form of 96 

Inside macro definitions 96 
Operand field of 96 
Outside macro definitions 96 
Sequence symbol in 96 
s Use of 96 
j AGOB instruction 13,75 
AIF instruction 95 
Example of 95 
Form of 95 

Inside macro definitions 95 
Invalid operand fields of 95 
Logical expression in 95 
Operand field of 95 
Outside macro definitions 95 
Sequence symbols in 95 
Use of 95 

Valid operand fields of 96 
| AIFB instruction 13,75 
Alignment, boundary 

CNOP instruction for 65 
Machine instruction 41 
Ampersands in 

Character expressions 92 
Macro-instruction operands 79 
MNOTE instruction 99 
Symbolic parameters 74 
Variable symbols 72 


ANOP instruction 97 
Example of 97 
Form of 97 

Sequence symbol in 97 
Use of 97 
Apostrophes in 

Character expressions 91 
Macro instruction operands 77 
MNOTE instruction 99 
Arithmetic expressions 

Arithmetic relations 94 
Evaluation procedure 89 
Invalid examples of 89 
Operand sublists 90 
Operators allowed 88 
Parenthesized terms in 89 
evaluation of 89 
examples of 89 
SETA instruction 88 
SETB instruction 93 
Substring notation 91,92 
Terms allowed 88 
Valid examples of 88 
Arithmetic relations 94 
Arithmetic variable 104 
Assembler instructions 
Statement 46 
Table 144 

(see specific instructions) 
Assembler language 13 

Basic Operating System 13 
Basic Programming Support 13,170 
Coding conventions 16 
Comparison chart 170 
Macro facilities, relation to 71 
Statement format 17 
Structure 19,20 
Assembler program 

Basic functions 12 
DOS/TOS relationship 15 
Listing 160 
Output 34,183 
Variants 182 

Assembler relationships 15 
Assembling a Program 174 

Assemble-and-execute 13,178,181 
Card Input 174,178,181 
Device Assignments 176,177 
Diagnostic Error Messages 187 
I/O Units Used 179,180 
Operating Considerations 176,177 
Output 183 
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Assembly, terminating an 67 
Assembly no operation (see ANOP 
instruction) 

Attributes 84 

How referred to 85 

Inner macro instruction operands 84 
Kinds of 84 
Notations 84 
Operand sublists 84 

Outer macro instruction operands 84 
Summary chart of 151 
Use of 84 

(see also specific attributes) 


Basic Programming Support Assembler 13, 170 
Base Registers 

Address calculation 15,39,42 
DROP instructions 32 
Loading of 31 
USING instructions 31 
Binary constant 53 
Binary self-defining term 24 
Binary variable 104 
Bit length specification 49 
Mutiple constants 50 
Multiple operands 50 
Duplicated constants 50 
Blanks 

Logical expressions 93 
Macro instruction operands 79 


CCW instruction 60 
Channel command word, defining 60 
Character codes 113 
Character constant 51 
Character expressions 91 
Ampersands in 91 
Character relations 94 
Concatenating 92 
Examples of 91 
Periods and 91 
Apostrophes in 91 
SETB instructions 93 
SETC instructions 90 
Character relations 94 
Character self-defining term 24 
Charcter set 19,20,112 
Character variable 104 
CNOP instruction 65 
Coding form 17 
COM instruction 36 

Commas, macro instruction operands 79 
Comments entries 18 
Comments statements 
Examples of 19,78 
Model statements 78 
Not generated 78 
Comparison chart 70 
Compatibility between System/360 
assemblers 12 

DOS/TOS assembler variants 12 
DOS/TOS assemblers and OS assemblers 13 
DOS/TOS assemblers and BOS/BPS 
assemblers 13 
Macro-definitions 111 


Complex relocatable expressions 57 
Concatenation 

Character expressions 91,92 
Defined 77 
Examples of 77 
Substring notations 91 
Conditional assembly elements, summary 
charts of 97,150 
Conditional assembly instructions 
How to write 83 
Summary of 98 
Use of 83 

(see also specific instructions) 
Conditional branch (see AIF instruction) 
Constants (see also specific types) 
Defining (see DC instructions) 

Summary of 147 
Continuation lines 16 
Conditional branch instruction 44 
Operand format 43,44 
Control section location assignment 35 
Control sections 

Blank common 36 
CSECT instruction 35,36 
Defined 34 
DSECT instruction 36 

First control section, properties of 35 
START instruction 35 
Unnamed 36 
COPY instruction 66 

COPY statements in macro definitions 
Form of 78 

Model statements, contrasted 78 
Operand field of 78 
Use of 78 
Count attribute 
Defined 86 
Notation 84 
Operand sublists 86 
Use of 86 

Variable symbols 86 
CSECT instruction, symbol in, length 
attribute of 35, 36 
Current control section name (&SYSECT) 
Affected by CSECT, DSECT, START 105 
Example of 106 
Use of 105 


Data definition instructions 47 
Channel command words 60 
Constants 47 
Storages 58 

Data representation 15 
DC instruction 47 

Duplication factor operand subfield 48 
Operand subfield modifiers 48 
Type operand subfield 48 
Length modifier 48 
Scale modifier 50 
Exponent modifier 51 
Constant operand subfield 51 
Address-constants (see address 
constants) 

Binary constant 53 
Character constant 52 
Decimal-constants 56 




» 
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DC instruction (continued) 

Fixed-point constants 53 
Floating-point constants 54 
Hexadecimal constant 52 
Type codes for 50 
Decimal constants 56 
Length modifier 56 
Length, maximum 56 
Packed 54 
Zoned 54 

Decimal field, integer attribute of 87 
Decimal self-defining terms 91 
Defining constants (see DC instruction) 
Defining storage (see DC instruction; 

DS instruction) 

Defining symbols 22,83 
Diagnostic Error Messages 187 
Dimension, subscripted SET symbols 104 
Displacements 42 
Double-shift instruction 42 
DROP instruction 32,42 
DS instruction 58 
Defining areas 59 
Forcing alignment 59 
DSECT instruction 36 

Dummy section location assignment 36,38 
Duplication factor 48 
Forcing alignment 59 


Effective address length 43 
EJECT instruction 61 
END instruction 67 
ENTRY instruction 38,39 

Entry point symbol, identification of 38 
EQU instruction 46 
Equal signs, as macro instruction 
operands 79 

Error message (see MNOTE instruction) 

Error Messages 187 

After END statement 67 
Explicit addressing 31,42 
Length 42 

Exponent modifiers 51 
Expressions 26,27,38 
Absolute 42 
Character 91 
Evaluation 27 
Logical 94 
Relocatable 42 
Summary chart of 150 
Extended mnemonic codes 44 
Operand format 45 
Table 123 

External control section, addressing of 39 
External symbol, identification of 39 
EXTRN instruction 39 


First control section 35 
Fixed-point constants 53 
Format 53 
Positioning of 53 
Scaling 54 

Values, minimum and maximum 53,54 
Fixed-point field, integer attribute 
of 86 


Floating-point constants 54 
Alignment 55 
Format 55 
Scale modifiers 55 

Floating-point field, integer attribute 
of 87 

Format Control, input 63 


GBLA instruction 
Form of 101 

Inside macro definitions 101 
Outside macro definitions 101 
Use of 101 
GBLB instruction 
Form of 101 

Inside macro definitions 101 
Outside macro definitions 101 
Use of 101 
GBLC instruction 
Form of 101 

Inside macro definitions 101 
Outside macro definitions 101 
Use of 101 

General register zero, base register 
usage 32 

Generated statements, examples of 77 
Global SET symbols 
Defining 101 
Examples of 101,102,103 
Local SET symbols, compared 100 
Using 101 

Global variable symbols 
Types of 100 

(see also global SET symbols, sub¬ 
scripted SET symbols) 


Hexadecimal constants 52 

Hexadecimal-decimal conversion chart 116 
Hexadecimal self-defining terms 23 


I' (see Integer attribute) 

ICTL instruction 63 
Identification-sequence field 19 
Identifying blank common control 
section 37,38 

Identifying assembly output 60,61 
Identify dummy section 36 
Implied addressing 31,42 
Length 42 

Implied length specification 42 
Inner macro instruction 
Defined 79 
Example of 82 
Symbolic parameters in 82 
Instruction alignment 41 
Instruction format 19 
Interger attributed 
Decimal fields 87 
Examples of 87 
Fixed-point fields 87 
Floating-point fields 87 
How to compute 87 
Notation 84 
Restrictions on use 87 
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Integer attributed (continued) 
Use of 87 

ISEQ instruction 63 


K' (see Count attribute) 

Keyword 

Defined 108 

Keyword macro instruction 108 
Symbolic parameter and 107 
Keyword, inner macro instructions used 
in 109 

Keyword macro definition 

Positional macro definitions 107 
compared 107 
Use 107 

Keyword macro instruction 
Example of 109 
Format of 108 
Keywords in 108 
Operands 68,108 
Invalid examples 109 
Valid examples 109 
Operand sublists in 109 
Keyword prototype statement 
Examples of 108,109 
Format of 108 
Operands 108,109 

Invalid examples 108 
Valid examples 108 
Standard values 108 


L' (see Length attribute) 

LCLA instruction 
Form of 88 
Use of 88 
LCLB instruction 
Form of 88 
Use of 88 
LCLC instruction 
Form of 88 
Use of 88 
Length modifier 48 

Bit length specification 49 
Lengths explicit and implied 42,43 
Length attribute 
Defined 43,85 
Examples 85 
Notation 84 
Restrictions on use 86 
Symbols 22,86 
Use of 85, 86 
Length modifier 48 
Length subfield 41 
Level of parentheses 26 
Library, copying coding form 66 
Linkage symbols (see also ENTRY 
instruction; EXTRN instruction) 
Entry point symbol 38 
External symbol 38 
Linkage editor and use of 38 
Listing, spacing 61,62 
Listing control instructions 60 
Literal pools 26,64,65 

Segments one to four 65 


Literals 25 
Character 42 

DC instruction, used in 25 
Duplicate 26 
Format 25 

Literal pool, beginning 65 
Literal pools, multiple 26 
Treatment of self-defining term 25 
Local SET symbols 
Defining 101 
Examples of 101,102,103 
Global SET symbols, compared 100 
Using 101 

Local variable symbols 
Types of 100 

(see also local SET symbols) 

(see also subscripted SET symbols) 

Location counter 46,51,57 
Predefined symbols 23 
References to 23 
Setting 64 
Logical expressions 

AIF instructions 95 
Arithmetic relations 94 
Blanks in 94 
Character relations 94 
Evaluation of 94 
Invalid examples of 94 
Logical operators in 94 
Parenthesized terms in 
Evaluation of 94 
Examples of 94 
Relation operators in 94 
SETB instructions 93 A 

Terms allowed in 94 v J 

Valid examples of 94 
LTORG instruction 64,65 


Machine features required 9 
Machine instructions 41 

Alignment and checking 41 
Length 43 

Literals, limits on 25 
Mnemonic operation codes 43 
Operand fields and subfields 41 
Symbolic operand formats 43 
Machine-instruction mnemonic codes 43 
Alphabetical listing 123 
MACRO 

Form of 74 
Use 74 

Macro definition 

Compatibility 111 
Defined 74 
Example of 76 
How to prepare 74 

Keyword (see Keyword macro definition) 
Mixed-mode (see Mixed-mode macro 
definition) 

Placement in source program 74 
Sample 162,203,204 
Use 74 

Macro definition exit (see MEXIT 
instruction) 

Machine instruction examples and format 
RR 41,43,44 
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Machine instruction examples and format 
(contined) 

RX 41,44 
RS 41,44 
SI 41,44 
SS 41,44 

Summary table 120,121 
Macro definition header statement (see 
MACRO) 

Macro definition trailer statement (see 
MEND) 

Macro facility 

Additional features 97,98 
Comparison chart 173 
Relation to assembler language 71 
Summary 98,149 
Macro instruction 
Defined 71 
Example of 80 
Form of TS> 

How to write 79 
Levels of 82 
Inner 82 

Mnemonic operation code 79 
Name entry of 79 
Omitted operands 80 
Example of 80 
Operand entry of 79 
Operands 

Ampersands 80 
Blanks 8Q 
Commas 80 
Equal signs 8Q 
Paired parentheses 79 
Paired apostrophes 79 
Operand sublists 80,81 
Operation entry of 79 
Outer 81 

Statement form 80 
Types of 69 

Used as model statement’ 81 
Macro instruction index (&SYSNDX) 

AIF instruction 104 
Arithmetic expressions 104 
Character relation 104 
Example 105 
MNOTE instruction 104 
SETB instruction 104 
SETC instruction 105 
Use of 104 

Macro instruction operand (&SYSLIST) 
Attributes of 106 
Use of 106,109 
(see also symbolic parameters) 

Macro instruction prototype statement 
(see prototype statement) 

Macro instruction statement (see macro 
instruction) 

MEND 

Form of 74 

MEXIT instruction, contrasted 99 
Use of 74 
MEXIT instruction 
Example of 99 
Form of 99 
MEND, contrasted 99 
Use of 99 


Mixed-mode macro definitions 

Positional macro definitions 
contrasted 110 
Use 109,110 

Mixed-mode macro instruction 
Example of 110 
Form of 110 

Operand field of 69,110 
Mixed-mode prototype statement 
Example of 110 
Form of 110 
Operands of 110 
Mnemonic operation codes 43 
Extended 44 
Machine instruction 43 
Macro instruction 74 
MNOTE instruction 

Ampersands in 100 
Error message 100 
Example of 100 
Operand entry of 99,100 
Apostrophes in 100 
Severity code 100 
Use of 99 
Model statements 

Comments field of 76 
Comments statements 78 
Defined 75 
Name field of 75 
Operation field of 75 
Operand field o'f 76 
Use of 75 


N’ (see Number attribute) 
Name entries 18 
Number attribute 
Defined 86 
Notation 86 
Operand sublist 86 


Object deck 183 
Object module 34 
Operands 

Entries 17,18 
Fields 41 
Subfields 41,42 
Symbolic 38,41,43 
Operand sublist 

Alternate statement form 81 
Defined 80 
Example of 81 
Use of 81 
Operation codes 
Assembler 14 
Machine 14 

Operation entries 17,18 

Operation field 41 

Ordinary symbol 22 

ORG instruction 64 

Outer macro instruction defined 81 


Paired parentheses 79 
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Paired apostrophes 79 
Parentheses in 

Arithmetic expressions 89 
Logical expressions 94 
Macro instruction operands 79,80 
Operand fields and subfields 42 
Paired 79 
Period in 

Character expressions 91 
Comments statements 78 
Concatenation 78 
Sequence symbols 87 
Positional macro definition (see macro 
definition) 

Positional macro instruction (see macro 
instruction) 69 
Previously defined symbols 23 
PRINT instruction 62 
Program control instructions 62 
Program listings 15 

Program sectioning and linking 21,31,34 
Prototype statement 
Alternate 75 
Example of 75 
Form of 74 

Keyword (see keyword prototype state¬ 
ment) 

Mixed-mode (see mixed-mode prototype 
statement) 

Name entry of 74 
Operand entry of 74 
Operation entry of 74 
Statement form 74,75 
Symbolic parameters in 74 
Use of 74 

PUNCH instruction 63,64 


Relational operators 94 
Relative addressing 34 
Relocatability 15,20 
Attributes 38 

Program, general register zero 32 
Relocatable expressions 28,41 
In USING instructions 32 
Relocatable symbols 22 
Relocatable terms 
Pairing of 27 

In relocatable expressions 28 
REP card 186 
REPRO instruction 64 
RR machine instruction format 41,42 
Length attribute 41 
Symbolic operands 43 
RS machine instruction format 41,42 
Address specification 42 
Length attribute 41 
Symbolic operands 43 
RX machine instruction format 41,42 
Address specification 42 
Length attribute 41 
Symbolic operands 43 


S' (see scaling attribute) 

Sample macro definitions 161,203,204 
Sample program 160 


Scale modifier 

Fixed-point constants 50 
Floating-point constants 50,51 
Scaling attribute 

Decimal fields 85,86 
Defined 85 

Fixed-point fields 85,86 
Floating-point fields 85,86 
Notation 102 
Restrictions on use 86 
Symbols 85,86 
Use of 85,86 

Self-defining terms 23,24 
Binary 24 
Character 24 
Decimal 23 
Hexadecimal 23 
Using 23 

(see also specific terms) 

Sequence checking 63 
Sequence symbols 22,86,87 
AGO instruction 96 
AIF instruction 95,96 
ANOP instruction 97 
How to write 86,87 
Invalid examples of 87 
Macro instruction 87,88 
Use of 87 

Valid examples of 87,88 
Set symbols 

Assigning values to 83 
Defining 83 

Symbolic parameters, contrasted 83 
Use 83 

(see also local SET symbols) 

(see also global SET symbols) 

(see also subscripted SET symbols) 
SET variable 100,101 
SETA instruction 

Examples of 89,90 
Form of 88 
Operand entry of 88 

Evaluation procedure 89 
Operators allowed 88 
Parenthesized terms 89 
Terms allowed 88 
Valid examples of 88 
Operand sublist 90 
Example 90 
SETB instruction 
Example of 95 
Form of 93 

Logical expression in 94 
Arithmetic relations 94 
Blanks in 94 
Character relations 94 
Evaluation of 94 
Operators allowed 94 
Operand entry of 93,94 
Invalid examples of 94 
Valid examples of 94 
SETC instruction 
Apostrophes 90 
Character expressions in 90 
Ampersands 90 
Periods 90 
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SETC instruction (continued) 
Concatenation in 

Character expressions 91 
Substring notations 91,92 
Examples of 90,91,92 
Form of 90 
Operand entry of 90 
Substring notations in 91,92 
Arithmetic expressions in 92 
Character expressions in 92 
Invalid examples of 92 
Valid examples of 92 
Type attribute in 90,91 
Example of 91 
SETA symbol 

Assigning values to 83 
Defining 83 
SETA instruction 89 
Using 89 
SETB symbol 

AIF instruction 95,96 
Assigning values to 83 
Defining 83 
SETA instruction 95 
SETB instruction 95 
SETC instruction 95 
Using 95 
SETC symbol 

Assigning values to 83 
Defining 83 
SETA instruction 94 
Using 93 

Severity code in MNOTE instruction 100 
SI machine instruction format 44 
Address specification 42 
Length attribute 41 
Symbolic operands 43 
Source module 34 

Source statement library defined 72 
SPACE instruction 61,62 
SS machine instruction format 41,44 
Address specification 42 
Length attribute 41 
Length field 42 
Symbolic operands 43 
START instruction 

Positioning of 34 
Unamed control sections 35 
Statements 16,17 
Boundaries 16 
Examples 18 
Macro instructions 80 
Prototype 74 
Summary of 146 

Storage, defining (see DS instruction) 
S-type address constant 57 
Sublist (see operand sublist) 
Subscripted SET symbols 
Defining 103 
Dimension of 104 
Examples 104 
How to write 103 
Invalid examples of 103 
Subscript of 104 
Using 104 

Examples 104 


Valid examples of 103 
Substring notation 

Arithmetic expressions in 92 
Character expression in 92 
Concatenating 92 
How to write 92 
Invalid example of 92 
SETB instruction 94 
SETC instruction 93 
Valid examples of 92 
SYM card 185 

Symbol definition, EQU instruction for 46 
Symbols 

Absolute 22 
Defining 22 
Length attributes 41 
Referring to 26 
Length, maximum 23 
Ordinary 22 
Previously defined 23 
Relocatable 22 
Restrictions 23 
Sequence 22,87 
Symbol table capacity 153 
Types of 22 
Value attributes 41 
Variable 22 
Symbolic linkages 38 

ENTRY instruction 38,39 
EXTRN instruction 39 
Symbolic operands formats 43 
Symbolic parameter 
Comments field 76 
Concatenation of 77 
Defined 76 
How to write 76 
Invalid examples of 76 
Model statements 76 
Prototype statement 74 
Replaced by 76 
Valid example of 76 

System parameter for conditional assembly 
Assigning values 107 
Defined 107 
System variable symbols 

Assigned values by assembler 104 
Defined 104 

(see also specific system variable 
symbols) 


T' (see Type attributes) 

Tables, internal, capacity of 151 
Terms 

Expressions composed of 20 
Pairing of 27 
TITLE instruction 61 
Type attribute 
Defined 85 
Literals 85 

Macro instruction operands 85 
Notation 84 
SETC instruction 90 
Use 8 5 


Unconditional branch (see AGO instruction) 
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Unamed control section 35 
USING instruction 31,42 


Variable symbols 22 

Assigning values to 72 
Defined 72 
How to write 72 
Restrictions in use to generate 
operation codes 74,75 
Summary chart of 150 
System 104,105 


Variable symbols (continued) 

Types of 72 
Use 72 

(see also specific variable symbols) 
V-type address constant 58 
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XFR instruction 13 

Y-type address constant 57 1 
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